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Redactioneel 

De berichten over Commo¬ 
dore de afgelopen maan¬ 
den waren niet bijster posi¬ 
tief. Het bedrijf heeft het de- 
cemberseizoen overleefd, 
en in de VS en Europa toch 
nog enige miljoenen C-64 ’s, 
honderdduizenden C-128's 
en in de VS meer dan 
100.000 Amiga’s verkocht. 
Er is weer wat geid binnen¬ 
gekomen, nmaar men blijft 

een forse schuld van meer 
dan 500 miljoen gulden aan 
de banken houden. Het 
aantal personeelsleden is 
fors gedaald, men heeft een 
aantal fabrieken gesloten 
en de kosten zo ver moge¬ 
lijk terug geschroefd. Maar 
ja, het zijn uiteindelijk de 
verkopen, die geld in het 
laatje moeten brengen en 
ook bij computers blijft mar¬ 
keting, fors aan de weg tim¬ 
meren en het verkoopappa¬ 
raat in stand houden, de 
enige oplossing. Het is dus 
de vraag of Commodore 
het overleeft, of liever ge¬ 
zegd, of de banken het be¬ 
drijf laten leven. 

We hopen van wel, want 
anders zijn de vele miljoe¬ 
nen Commodore gebrui¬ 
kers behoorlijk gedupeerd 
en kunnen we haast zeg¬ 
gen, dat het huiscomputer 
tijdperk dan een voortijdig 
einde gaat vinden. Dat zou 
jammer zijn, zeker nu de 
stap naar de krachtiger 16/ 
32 bits systemen zoals de 
Amiga zo veelbelovend en 
nabij leek. Pas op langere 
termijn, we denken aan 
1988 en 1989, zal de inte¬ 
grale huishoudelijke elec- 
tronica en de home bus 
weer een nieuwe stimulans 
gaan vormen. 

Het is jammer, dat CBM bij¬ 
voorbeeld niet aanwezig 
was op de Consumer Elec¬ 
tronics Show in Las Vegas, 
waar men op het laatste 
moment verstek liet gaan 
enAtari daarmee alle ruimte 
en aandacht liet. We waren 
zelf met een aantal andere 
Nederlandse bedrijven 
(Aackosoft, Radarsoft, Caf- 
ka) met een gezamelijke 


Ontwikkelingen en nieuwe 
produkten. _ 

Datakolom 8 

Innovatie is iets anders dan 
doortrekken van de be¬ 
staande lijnen, vindt Luc 
Sala. _ 

Teleac 9 

Computercursus voor PC 
gebruikers van Teleac. 
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Little Computer 
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Activision haalt het (compu- 
ter)-poppenhuis terug en dit 
belooft een superhit te 
worden. 

Dubbele 

Resetknop 15 

Een hardware-project van 
Wim Wubs, waarmee reset- 
problemen bij de 64 worden 
opgelost. 


Nederlandse stand in Las 
Vegas aanwezig om het 
blad "HOME BUS INFO” te 
introduceren. In de relatieve 
warmte van Nevada bleek 
wel, dat we met onze Ne¬ 
derlandse produkten geluk¬ 
kig nog heel goed mee kun¬ 
nen, en dat koopmanschap 
en innovatie nog steeds de 
kenmerken zijn van de "IN- 
CREDIBLE DUTCH", zoals 
onze stand heette. 

Ook in Nederland komt er 
weer een grote computer¬ 
beurs in de langzamerhand 
bekende Commdore-lnfo 
traditie, al hebben we deze 
keer ook de gebruikers van 
andere merken micro’s niet 
buiten de deur van de HOB- 
BYCOMPUTER INFO 
BEURS willen houden. Op 8 
maart a.s. in de RAI, waar u 
weer van alles kunt zien en 
kopen en we hebben van 
Commodore begrepen, dat 
dan ook de Amiga officieel 
in Nederland zal zijn. 

L.Sala 
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Basic 

miniatuurtjes 26 

De vaste rubriek van Nico 
Baaijens met korte intikkers 
van en voor onze lezers. 



Toekomst- 
simulatie 28 

De computer biedt hulp bij 
de toekomstvoorspelling. 


Machinetaal 64 
deel 9 

47 

De Vic Interrupts en analyse 

van het Plotprogramma. 


Kleine 

Advertenties 

65 

Philips 

Videowriter 

67 

Telarium 

Software 

Interactive fiction 

67 

Vragen 

68 

Jan Bodzinga reageert 
weer op vragen en brieven 

van lezers. 



Converseren met 
de computer 71 

Praten en luisteren door de 
micro. 


De computer kan alles? 

TEST 

Insteekmodules 77 

De Final en de Power car- 
tridges vergeleken. 

Missers 79 

Fouten uit eerder gepubli¬ 
ceerde listings worden hier 
rechtgezet. 

Gebruikers¬ 
groepen 80 

Verenigingsnieuws en bij¬ 
eenkomsten. 

COMMODORE 
BUSINESS 
INFO 39 

Een blad in het blad met 
aandacht voor de zakelijke 
gebruiker, die in MS-DOS of 
Amiga zijn heil zoekt. 


Listingrubriek 


PRINT-OUT 

30 

Ook deze keer 


weer een groot 


aantal flitsende 

listings en 


hulpprogramma’s, 

ook voor de C-16: 

Utilities 

31 

Weer drie pagina’s 


handige hulpprogramma’s, 

met Geluid, Auto 10, 


Afronden, Autorun, Omlijst, 

Diskroutine, Toetstest. 


Chipcontact 

34 

Vlaggen 

35 

Fleenenweer 

37 

3D Tekst 

37 

VU-meter 

38 

Logoboom 

38 

Figuren 64 

51 

Kubus 64 

52 

Rekenpen 

53 

Wandelgang 

54 

Lettertekenaar 

55 

Op Tel en Sprong-64 

56 

Bioritme 

57 

Listings C-16 

59 

Eeuwige kalender 

59 

Kleurencirkel 

60 

Kleurencirkel 2 

60 

C-16 bestand 

61 

Boxing 

63 


3 




COMMODORE-INFO 

verschijnt lOx per jaar 

Jaargang 3, no. t, 1986 

Uitgave: 

Sala Communications 

Uitgever: 

Drs. J.Taverne 

REDAKTIE 

Ir. L. Sala hoofdredacteur 

J. Bodzinga adj.hoofdred. 

K. van der Vlies reportage 
R. van den Heuvel listings 
B. Munniksma onderwijs 
Sj. Bakker machinetaal 

ART DEPARTMENT 
Omslagontwerp: 

Ben van Mierlo 

Strip: 

Bert Tier 

Illustraties: 

Ben van Mierlo 
Vmmot 

Marketing/Beurzen: 

Ing. V. Sala 

Redaktieadres: 

Postbus 112 
1260 AC Blaricum 
® 02152-65695 

Abonnementen en 
administratie: 

Postbus 5570 
1007 AN Amsterdam 
Den Texstraat 5a 
1017 XW Amsterdam 
® 020-2731 98 

Abonnement: 

ƒ 55,-of Bfr. 1100 perjaar 
(10 nummers) 

Betaling op Giro 1585491 tnv. 
SAC/COMMODORE-INFO 
Blaricum of in België op Bank 
BBL nr. 310050602562, 
vermeld SAC/COMMODORE- 
INFO. Oude nummers a ƒ 6,75 
alleen bij vooruitbetaling op 
giro 1585491. 

Redactiesecretariaat: 

F. Belmer 
J. Emmelot 

Druk: 

Verweij, Mijdrecht 
NDB, Zoeterwoude 

Distributie: 

in Nederland Betapress/Gilze 
in België AMP/Brussel 

© 1985 COMMODORE-INFO 
Alle rechten voorbehouden 
ISSN: 0169-3085 


Schriftelijke 

cursus 

machinetaal 

Na het ontstaan van allerlei 
cursussen voor de huiscompu- 
ters op het gebied van Basic, is 
ook het NTI nu een schriftelijke 
cursus Machinetaal voor de 
C-64 begonnen. En het ziet er 
naar uit dat deze cursus in een 
behoefte gaat voorzien. Vol¬ 
gens de auteur, Ir. Bodelier, is 
deze cursus uitsluitend te dan¬ 
ken aan de grote vraag, die de 
gevorderde Basic-cursist aan . 
de dag legde t.a.v. de machi¬ 
netaal voor de 6502/6510 pro¬ 
cessor. 

De cursus is geschreven met 
een directe schakel naar de C- 
64, maar kan in feite worden 
gebruikt voor alle computers, 
zelfs VIC- 20 en Apple, die van 
deze serie microprocessoren 
gebruik maakt. Voor de C-64 
bestaat er echter de mogelijk¬ 
heid de bij de NTI-cursus gratis 
geleverde assembler in car- 
tridge aan te sluiten. Als editor 
wordt er van de standaard 
Basic-editor gebruik gemaakt, 
een aardige toevoeging op de 
mogelijkheden van de C-64, 
hoewel een aparte editor 
eigenlijk de voorkeur zou ver¬ 
dienen. De bestanden kunnen I 
naar keuze op disk of tape wor¬ 
den bewaard. 

De cursus is met name be¬ 
doeld voor de mensen die in¬ 
middels de nodige ervaring 
met Basic hebben opgedaan. 
Verder wordt enig gezond ver¬ 
stand en de wil om te studeren 
verondersteld, want machine¬ 
taal is nu eenmaal niet iets wat 
je in een dag kunt leren. De 
opzet van de cursus volgt de 
weg van een gedegen instituut, 
door de stof zonder veel om¬ 
haal duidelijk en stapsgewijs 
aan de cursist voor te schote¬ 
len. Verwacht geen directe 
wonderen van deze studie, je 
zult het toch zelf moeten leren, 
maar het is voor de doorzetters 
zeker de moeite waard om de 
cursus alle 32 lessen lang te 
doorlopen. Er zijn NTI leraren 
beschikbaar, die de cursisten 
kunnen bijstaan met adviezen _ 


en individuele hulp, zodat er na 
een maand of wat genoeg ba¬ 
siskennis is vergaard om zelf 
een behoorlijk machinetaal- 
programma te kunnen 
schrijven. 

Soft Card 

Is het einde van de datacasset- 
te inzicht? Als het aan de fabri¬ 
kanten van de Memory Cards 
ligt wel. Er zijn twee, helaas niet 
compatibele typen, namelijke 
de Soft Card van Astron en de 



Bee Card van Mitsubishi. Voor 
de MSX al verkrijgbaar, voor 
Commodore wordt er over ge¬ 
dacht. Op een ”bank/giropas” 
formaat gaan in ROM of 


EPROM vorm wel tot 512 Kb 
en dit nieuwe opslag medium 
is ook nog stevig, erg klein en 
krasvast. 

Er is natuurlijk wel een adapter 
nodig om de memory cards 
aan te sluiten op de expansie- 
slot, maar dan kunnen de ver¬ 
dere kaartjes ook zonder meer 
gebruikt worden. Die adapter 
gaan ongeveer 45 gulden kos¬ 
ten, dus dat is geen grote be¬ 
lemmering. 

TEC Flipover ko¬ 
pieert zichzelf 

Het klassieke schoolbord en 
de moderne flipover zijn on¬ 
misbare hulpmiddelen bij les¬ 
sen, lezingen, seminars en 
symposia. Maar zij hebben een 
geweldig nadeel. Zodra de 
door de inleider opgeschreven 
tekst gewist wordt is alles voor 
goed verdwenen. Wie geen tijd 
had het snel over schrijven 
grijpt er naast. 

Het TEC meeting board ziet er 
uit als een gewone flipover van 
een staand rechthoekig model. 
Maar dat is bedrieglijk. Het is in 
werkelijkheid een vernuftig 
elektronisch instrument. Het 
kan op de gebruikelijke manier 
worden beschreven met be- 


Micro Masters Holland 

Het ministerie van Onderwijs en Wetenschappen organiseert 
voor de tweede keer in samenwerking met het Ministerie van 
Economische Zaken de nationale computerwedstrijd voor mid¬ 
delbare scholieren: Micro Masters Holland. De eerste wedstrijd 
werd in het schooljaar 1984-1985 gehouden en trok ongeveer 
300 deelnemers. 

Micro Masters Holland is bestemd voor meisjes en jongens van 
13 tot en met 19 jaar. Zij worden gevraagd om eigengemaakte 
computerprogramma’s in te zenden of om door hen aan de 
computer gekoppelde apparaten ter beoordeling aan te bieden. 
De wedstrijd wordt gehouden in twee ronden. De finale is in mei 
1986. 

De inschrijving is nu weer opengesteld voor de nieuwe wed¬ 
strijd, waaraan dit keer ook clubs en groepen kunnen deelne¬ 
men. De organisatoren nodigen vooral meisjes uit om deel te 
nemen. 

Geïnteresseerden kunnen een informatie-pakket aanvragen bij 
het wedstrijdsecretariaat. Zij dienen een briefkaart met hun 
volledige naam en adres te sturen naar: Micro Masters Holland, 
Antwoordnummer 10316, 2400 WB Alphen aan den Rijn. Een 
postzegel is dan niet nodig. 
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hulp van een wisbare viltstift. 
Fouten kunnen worden her¬ 
steld, aanvullingen aange¬ 
bracht. Terwijl de spreker 
schrijft kan hij het oppervlak 



(een plastic laag) automatisch 
naar boven laten schuiven en 
een nieuw vel oproepen zodat 
er in wezen geen grens is aan 
de afmeting. Wie nu op een 
gegeven ogenblik het opge- 
schrevene wil vastleggen drukt 
op een knop waarmee een 
scanner aan de achterzijde in 
werking wordt gezet. De gege¬ 
vens worden teruggebracht tot 
A4 formaat en even later komt 
er een prima fotokopie van het 
geschrevene uit het bakje on¬ 
der aan het bord. 

Informatie : KN Kantoorsyste- 
men Nederland BV, Sloterweg 
303, 1171 VC, Badhoevedorp, 
tel. 02968-7055/7455 

C-64 Netwerk 

Randapparatuur als printers, 
diskdrives en kleurenmonito- 
ren is dikwijls aanzienlijk duur¬ 
der dan het kale C-64 eindstati¬ 


on. Bij educatief gebruik een in 
de papieren lopende ge¬ 
schiedenis als men voor iedere 
leerling (of groepje studenten) 
printers en drives moet kopen. 
Het Duitse HDS-Prüftechnik 
biedt daarvoor de oplossing: 
Een waar C-64/C128-netwerk 
dat zelfs aan de CBM 4000 of 
-8000-computers van de lera¬ 
ren gekoppeld kan worden. 
Via de IEEE-488-hardware 
kunnen de leerlingen met de 
CBM’s van hun leraar commu¬ 
niceren en deze laatste hun 
vorderingen controleren. Ver¬ 
dere info HDS, München 

Slagen voor het 
rijexamen 

Wolters Software 

Een nuttig pakket, dat de ge¬ 
bruiker voorbereidt op het the¬ 
orie- én praktijkdeel van het 
rijexamen. Het haakt in op de 
methodiek, zoals die bij het of¬ 
ficiële CBR-rijexamen wordt 
gebruikt. Meer dan 120 ver¬ 
keerssituaties en vragen zijn 
uitgekozen, die blijkens onder¬ 
zoek de meeste problemen op¬ 
leveren. In deel 1 worden eerst 



kruisingen en voorrangsregels 
behandeld, voor zover van toe¬ 
passing met sirenegeluiden 
van politie en brandweer. 

In deel 2 worden speciaal de 
theorie-vragen van het CBR- 
examen geoefend, waarbij ge¬ 
miste vragen opnieuw aan de 
orde komen. 


WERK-MARKT 

Onder onze lezers zijn er een vrij groot aantal, die in het 
verlengde van hun hobby eigenlijk wel interesse hebben in 
een baan, waarbij automatisering een rol speelt. Aan de 
andere kant weten we, dat ook bedrijven beseffen, dat 
gemotiveerde micro-gebruikers veel te bieden hebben. 
Commodore-lnfo gaat vanaf het volgende nummer aan 
lezers, die naar werk in deze richting zoeken, een extra 
service aanbieden. In een aparte advertentierubriek kun¬ 
nen lezers GRATIS een kleine advertentie plaatsen, waarin 
ze kort aangeven, wat ze kunnen en wat ze zoeken. Dus 
opleiding, leeftijd, interesse en computerkunde. Wij plaat¬ 
sen daar dan een advertentienummer bij en sturen de 
gegevens door, maar geef eventueel je telefoonnummer op. 



EPSON GX-80 

Business Class voor 
Atari gebruikers. 


Voor de kwaliteitsbewuste (en prijsbewuste) Atari gebruiker 
is er nu de Epson GX-80 printer die speciaal voor u 
ontworpen werd, snel is, maar ook letterkwaliteit kan 
printen. Professionele printtechniek voor een ongelooflijk 
lage prijs. De onovertroffen Epson kwaliteit voor probleem¬ 
loos gebruik met uw Atari computer. 

De belangrijkste eigenschappen: 

• afdruksnelheid 100 tekens per sekonde 

• 9 x 9 matrix, dus duidelijke letter 

• mogelijkheid om eigen tekens op te slaan 

• 1 KByte geheugenbuffer 

• bidirektioneel printen met logic seeking 

• 96 ASCII tekens en 32 internationale tekens, zowel 
normaal, als Near Letter Quality 

Sheetfeeder en tractorfeeder als extra leverbaar. 

De GX-80 is, dankzij een speciale interface, probleemloos 
aansluitbaar op praktisch alle gangbare computers. Naast 
Atari bijvoorbeeld ook MSX, Schneider, Commodore C-64 
en Centronics. 

Ga snel naar uw Epson of Atari dealer 
voor het beste printernieuws van 1986! 




V, 


V, 


mutax 


Pi* 


Postbus 25, 5473 ZG Heeswijk-Dinther, Holland, 


tel. 04139-8911, telex 74810, facsimile 04139-1009 (aut) 
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Commodore printer 

Van Commodore komt er een 
nieuwe printer uit, ditmaal een, 
die zowel voor MS-DOS als de 
andere Commodores geschikt 
is. Het betreft een vrij snelle en 
universele matrix-printer, die 
als MPS 1000 door het leven 
zal gaan en ongeveer 1200 gul¬ 
den gaat kosten. 

Venlo Computer dag 

Evenals vorige jaren ook nu 
weer een Internationale HCC 
Computerdag in de Maaspoort 
in Venlo op 22 februari van 10 
tot 6 u, inl. HCC Venlo (04765- 
1693). 

SPT/Brother AX-IO 

Ook de nieuwste Brother type¬ 
machine, de fluisterzachte AX- 
10, is nu al met een C64/128 
interface te koop en wel bij SPT 
((03435-73737) in Wijk bij Duur¬ 
stede en wel voor ƒ 995,- excl. 
Btw, incl. interface. 


C-16 Ad venture 

Er wordt met smart gewacht 
op Nederlandstalige C-16 pro¬ 
gramma’s, dat horen we van 
iedereen. Radarsoft brengt nu 
Hororhotel, een adventurepro- 
gramma, dat te koop is voor 
ƒ39,- via Topsoft. 

Basic Blok 

Malmberg met mini cursus. 

De eerste schreden op compu- 
terpad zijn niet de eenvoudig¬ 
ste, dat is bekend. U kunt daar¬ 
voor allerlei cursussen volgen 
en dat is, mede door de con¬ 
tacten, die daar kunnen op¬ 
bloeien en die van computeren 
ook een sociale hobby kunnen 
maken, ook aan te bevelen. 
Maar er blijven mensen, die 
alles zelf willen ontdekken. 
Voor hen heeft Malmberg een 
cursus in blokvorm, alles bij 
elkaar in een vierkant doosje 
voor ƒ 79,-. Een introductie tot 
Basic, waarbij op een goede 
manier, geleidielijk en gestruc¬ 



Postbus 8045, 3503 RA UTRECHT 


Techmation N.V. is een dynamische en snel groeiende 
handelsonderneming in hoogwaardige technologische produkten. 
Ons produktenassortiment bestaat o.a. uit computers, 
randapparatuur, datacommunicatie componenten en systemen. 

De analytische divisie verkoopt en onderhoudt apparatuur uit de 
specialisaties binnen de chemie als: gaschromatografie, 
elementenanalyse en milieucontrole. 

Voor bovengenoemde divisies zijn wij op korte termijn op zoek naar 
enkele 

SERVICE ENGINEERS 

(HTS-e/i) M/V 

en 


FIELD SERVICE ENGINEERS 

(MTS-e) M/V 

U beschikt over: 

- enige field service ervaring (strekt tot aanbeveling) 

- rijbewijs BE 

Voor bovenstaande funkties zal worden gezorgd voor gedegen 
produkttrainingen in zowel binnen- als buitenland. Het salaris en 
secundaire arbeidsvoorwaarden zijn uitstekend te noemen. Een 
representatieve bedrijfsauto wordt u ter beschikking gesteld. 
Uw uitsluitend schriftelijke reakties kunt u richten aan de heer 
R. Hartkamp. 
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tureerd, de computer u eigen 
wordt en u uzelf leert program¬ 
meren in Basic. Een prima idee, 
deze cursus en qua uitvoering 
een van de beste. 

Databasis 

Radarsoft programma nu ook 
voor C-128 

Sommige programma’s heb¬ 
ben een extra lang leven, en 
dat komt omdat de makers er¬ 
van steeds hun pakket aanpas¬ 
sen aan de nieuwste ontwikke¬ 
lingen. Dat blijkt dan uit 
nieuwere versienummers, nu al 
3.0 en natuurlijk uit de toege¬ 
nomen funktionaliteit. Hele¬ 
maal bij de tijd is de C-128 
versie van Databasis, die voor 
ƒ74 te koop is. 

Belastingslag 

Zoals altijd in het voorjaar is 
het weer tijd voor de belastin¬ 
gaangiften en daarbij kan de 
computer een echte hulp zijn. 


Dit jaar weer twee commer¬ 
ciële pakketten, namelijk een 
van Kluwer en een van Com- 
modore-lnfo (TAKS 64) en wel 
in de zelfde prijsklasse, name¬ 
lijk ƒ 24,50 en ƒ24,75. 

Dit jaar zijn beide pakketten 
beter, uitgebreider en ge¬ 
bruiksvriendelijker dan de ver¬ 
sie van vorig jaar. Er staat bij 
Kluwer een C-64 en een Spec¬ 
trum versie op één cassette, 
maar op die laatste machine 
kregen we laadproblemen. 
Men blijkt bij beide pakketten 
duidelijk uit de geheugenbe- 
perking van 64 KB te hebben 
willen stappen en heeft er een 
multi-load pakket van ge¬ 
maakt, dat in delen wordt gela¬ 
den en gedraaid. Bij Kluwer is 
er bijvoorbeeld een apart boe- 
kingsdeel met 99 posten, dat 
evenwel niet verder geinte- 
greerd is in het programma en 
een soort apart database stuk¬ 
je vormt. Het echte belasting- 
deel is bij Kluwer dan wel bin- 


GEBRUIKERS BOFFEN MAAR WEER!| 

met nieuwe produkten en fikse prijsverlagingen 

Maak nu zelf uw Autostart-Modules met ZERO’S SOFT-PROM! 

Batterij gevoede, 8k Bytes, ’eeuwig’durend,extra geheugen met software voor C-64 I 



|32kB GEHEUGEN, uitbreiding, schakelbaar. 

64kB GEHEUGEN idem, met speciale Ramfile software. 
40/80 TEKENKAART, professioneel, 80 tekens per regel. 
UITBREIDINGSKAART, 2 slots, spaar uw konnektor. 
UITBREIDINGSKAART , 5 slots, schakelbaar, gebufferd. 

EP ROM KAART , voor2K, 4K en 8K EPROMS, instelbaar. 

UITBREIDINGSKAART, 2 siots, 

UITBREIDINGSKAART , 5 slots, schakelbaar, gebufferd. 

EPRO Wf KAART, voor 2K, 4K en 8K EPROMS, instelbaar. 
EPROMPROGRAMMER, zet eigen programma’s op EPROM. 
EPROIVI WISSER, wist 4 EPROMs gelijktijdig. 



ZERO 


Nikkelstraat39 
2984 AM RIDDERKERK 
Tel. 01804-30 233 


• Alle prijzen excl. BTW 
9 Verzending onder rembours of per 
vooruitbetaling. 

9 Vraag kosteloos de uitgebreide folders aan. 


Ook zaterdags geopend 
Dealer aanvragen welkom. 





De eenzijdige oriëntatie van de pompu- 
terdenkers op beeldscherm en toetsen¬ 
bord blijft me verbazen. Er is toch wel 
meer te bedenken, dan een systeem dat 
slechts via ogen en vingers communi¬ 
ceert Maar men zit waarschijnlijk nog te 
vast in de oude sleur van de tèletype, 
toen computers nog niet eens per 
scherm, maar op papier hun reacties 
lieten weten. Men vat het begrip data te 
beperkt op als papiergericht, met vast¬ 
legging of archivering als hoogste doel. 
Wanneer je spreekt over anderssoorti- 
ge computers en dan als voorbeeld 
audio en geluidscomputers in breder 
verband noemt, blijft men in die pa- 
piersfeer doordenken. De experts ko¬ 
men wel direkt met hun ideeën over 
spraakherkenning en spraakbestunng 
op de proppen, maar binnen een be¬ 
perkt kader. Het doel daarbij blijft toch 
wel het via spraak in beeld en uiteinde¬ 
lijk op papier brengen van gegevens, 
de electronische stenografe. Men ziet 
spraak wel als een gemakkelijker in- 
voermethodiek, maarzit vast in de klas¬ 
sieke computeropvattingen. 

Ik denk echter, dat er juist buiten de 
kantoor- en productiviteitssfeer andere 
toepassingen zijn voor de samengebal¬ 
de rekenkracht van de chips. 

De huisvrouw wil helemaal niet typen, 
heeft aan één beeldscherm om de kin¬ 
deren zoet te houden waarschijnlijk 
meer dan genoeg en gaat echt geen 


electromsch kookboek in de keuken 
zetten, als ze wil gaan koken. Dat wil 
zeggen, ze heeft geen behoefte aan 
klassieke computerachtige apparatuur. 
Maar wanneer de electrische oven op 
een aardige manier zou reageren op 
gesproken commando's en aan de hand 
daarvan temperatuur, tijdsduur en ti¬ 
ming in een interactieve dialoog met de 
huisvrouwZ-persoon afstemt, dan veran¬ 
dert het beeld. We moeten zoiets alleen 
geen computer noemen, maar meer de 
intelligente oven. En dan zijn de intelli¬ 
gente wasmachine, haardroger, fritess- 
nijder, huisrobot, en grasmaaier natuur¬ 
lijk niet ver meer. Om over de intelli¬ 
gente massagerobot nog maar niet te 
spreken. En dan de hele zaak aan elkaar 
gekoppeld via de HOME BUS of de D2B 
bus van Philips en het intelligente huisis 
gerealiseerd. Zoals u begrijpt, tech¬ 
nisch geen echt hoogstandje meer, het 
is een combinatie van bekende tech¬ 
nieken in een geïntegreerd geheel, 

Audiocomputers kunnen best zo klein 
worden, dat ze in het oor passen. 

Maar waar vinden we de juiste impulsen 
om zoiets aantrekkelijk te maken voor 
de gemiddelde koper, of zelfs maar 
voor de snufjesjager? We zullen toch 
tenminste een nieuw concept, een echt 
voordeel moeten inbouwen, waar dan 
de hele home bus golf compleet met 


audio- reuk- en smaakcomputers achte¬ 
raan gaat lopen. 

Naar mijn mening is de audio-computer 
of audio-processor daarbij een schar¬ 
nierpunt, een technologie die andere 
dingen gaat meeslepen. Een audiocom- 
puter, waarbij geluid en spraak zowel 
voor input als output de primaire infor¬ 
matiedragers zijn en geen schermen of 
toetsen meer gebruikt worden. Zo'n au- 
diocomputer kan net zo groot zijn als 
een PC, maar technisch is er geen re¬ 
den, om niet in de grootte-orde van een 
gehoorapparaat te denken. Als aankno¬ 
pingspunt noem ik hier een extreem 
voorbeeld, namelijk een simultaan audi- 
overtaler. Direkt de gesproken tekst 
vanuit een vreemde taal omzetten in 
begrijpelijke tekst. Technisch gezien 
een zaak van enige Megabits aan infor¬ 
matie in een referentiegeheugen, een 
24-bits processor en een compleet 
nieuwe audio-programmeeromgeving, 
maar zeker geen onhaalbare zaak in 
een tijdsbestek van een jaar of tien. En 
wat betekent zoiets niet voor de samen¬ 
leving, is dat het einde van de wereld¬ 
wijde communicatieproblematiek, een 
nieuw vredesmiddel, dat oorlogen zal 
uitbannen? Voor een fractie van het 
budget van het Star Wars programma is 
de ontwikkeling van zo'n vertaalwonder 
mogelijk, en de implicaties ervan zijn 
veel structureler dan die van het plaat¬ 
sen van de kruisraketten. L.Sala 


nen één module gehouden en 
de vraagstelling is dan ook ta¬ 
melijk kortaf. Daarmee wordt 
evenwel de moeilijke pro¬ 
bleemstelling rond de tweever- 
dienersregeling belastingtech¬ 
nisch weinig recht gedaan, ter¬ 
wijl ook het invoeren fouten 
toelaat als negatieve perioden 
en het berekenen van de af¬ 
trekposten soms niet goed ver¬ 
loopt, de optelling klopt dan 
niet. Zo merkten we, dat door 
bv. het invoeren van te lange 
plaatsnamen de zaak afbreekt, 
dus voorzichtig aan, anders is 
het eerdere werk verloren. Men 
moet goed controleren, of iets 
juist is ingevoerd, maar dat 
wordt ook duidelijk gevraagd 
na de invoer. Omdat de zaak in 
Basic is geprogrammeerd en 
ook gelist kan worden, is het 


pakket niet zo snel, maar zijn 
aanpassingen voor de kenner 
wel weer mogelijk. Voor de toe¬ 
lichting wordt verwezen naar 
de Kluwer (papieren) belasting- 
gids en het is dan ook zaak, die 
samen met het pakket aan te 
schaffen. 

Bij Taks 64 heeft men het echte 
belastingdeel niet binnen de 64 
KB gehouden en dat werkt dus 
iets minder gebruiksvriende¬ 
lijk. Wel is de vraagstelling en 
de logische opbouw (dus niet 
om AOW premie vragen, wan¬ 
neer men ouder dan 65 is etc.) 
wat beter opgezet. Taks is dan 
ook deels in machinetaal en 
dus duidelijk sneller en kent 
daarnaast wat modernere pro- 
grammatechnieken zoals een 
aparte calculator rekenfunctie 
in beeld en een info/hulptoets. 


Ook dit programma is geschikt 
voor alle aangiften, A/B/E/T en 
vermogensbelasting. Taks laat 
ook saven van alle gegevens 
toe, zodat dit pakket meer ge¬ 
richt is op degene, die meerde¬ 
re aangiften verzorgd, men kan 
per naam de zaak bewaren en 
er is ook een diskversie, die dat 
nog makkelijker maakt. 

Onze conclusie is, dat beide 
pakketten duidelijk beter zijn 
dan die van vorig jaar, dat Klu- 
wer’s versie compacter is, met 
minder uitleg per vraag en wat 
meer eisen aan de invoernauw- 
keurigheid en logica, maar ook 
met een ruimere pakketom- 
vang met een apart toelich- 
tingsdeel vooraf en een boe- 
kingsdatabase voor wie veel 
bonnetjes heeft. 


COMPUTER- 

KAMPEN 

Het nuttige en 
aangename! 

Voor 10-16 jarigen gedurende 
de schoolvakanties 

► Inclusief cursus Basic 

► Met C-64 en P-2000-T 
computers 

► Veel praktische en educatieve 
programma’s 

► Ook aandacht voor sport, spel 
en rekreatie 
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Uitslag prijsvraag 


We zijn u nog steeds de uitslag van onze programmeerwed- 
strijd schuldig. Doordat we het Grote Commodore- Info boek 
moesten maken, en alle daarin geplaatste inzendingen en 
prijswinnaars daarover al bericht ontvingen, was dat ook niet 
zo urgent. Maar de lijst met de prijswinnaars geven we 
natuurlijk graag. 

De maker van Woestijnrace kreeg onze hoofdprijs, een Novex 
kleurenmonitor. Hoewel zijn programma wat ingewikkeld was 
opgezet, vonden we het resultaat in zo weinig regels toch 
verbluffend. Winnaar A.Reitsma uit Heerenveen kreeg ondertus¬ 
sen zijn prijs thuisgestuurd, die hij overigens verdiende voor zijn 
hele inzending, waarbij ook de programma’s Glop-Glop en Scroll- 
spel 64. 

De tweede prijs, een Commodore-printer, ging naar Nathan 
Verstraete uit Zeveneken in België voor het Vlak van Thaan, een 
zeer fraai op-art programma. 

De derde prijs deelden we op en wel tussen Mare de Hingh uit 
Breda, die voor Schijngestalten van de Maan een Quick Data- 
Drive krijgt, en er een 80 kolommenkaart gewonnen is door 
Maurice de Wit uit Haacht in België voor Cijferrun 
Voor de inzenders, die er verder echt uitstaken en die we dus ook 
wel verder willen aanmoedigen, hebben we verschillende soft¬ 
ware- pakketten als prijzen. Die zijn gegaan naar J. van de Bosch 
uit Utrecht, G. Gabriele uit Den Haag, E. Calbo uit Terneuzen, 
J.van Osch uit Apeldoorn, W. van Velzen uit Lisse en P. van de 
Kruys uit Weert. 

Daarnaast hebben alle inzenders, wiens bijdrage in het Grote 
Commodore Info listingboek is gebruikt, natuurlijk al een exem¬ 
plaar van het boek opgestuurd gekregen. 

Tot onze spijt zou het uitzoeken en terugsturen van alle cassettes 
(er waren 550 inzendingen) te veel tijd nemen. Maar daarom 
hebben we iedereen ook direkt na ontvangst van zijn inzending 
een programmacassette toegestuurd. 


HMr 



Prijswinnaar Idee 1990 

Op de HCC dagen kreeg Otto Tielemans, een van de prijswinnars 
van de Idee 1990 wedstrijd, zijn prijs uitgereikt door de marketing 
manager van Secom. Otto won een computerhorloge van Seiko, 
waarmee hij zeker tot 1990 mee bij de tijd is. 
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Voor de mensen die in computers zijn 
geïnteresseerd, en voor de televisiekij¬ 
kers onders ons staat er iets spectacu¬ 
lairs voor de deur. Er komt een officiële 
cursus voor de PC, de Personal Compu¬ 
ter! Vanaf 21 januari is Teleac zowel op 
de radio als de televisie begonnen met 
het uitzenden van deze primeur in Eu¬ 
ropa. 

O ok al vind je dit nieuws niet zo 
wereldschokkend als het hier ge¬ 
drukt staat is het aan te bevelen 
om nog even verder te lezen, want 
in tegenstelling tot wat je wellicht 
verwacht, is dit artikel niet zozeer voor de 
PCI 0 bezitters maar voor de Commodore 
64 en C-16 lezers. 




Waarom zou deze cursus voor je van be¬ 
lang kunnen zijn ? Stel, je bent studerend 
of werkloos en je wilt vroeger of later aan 
het werk. Of je hebt een baan maar vraagt 
je zelf af: Voor hoe lang nog ?’ De automa¬ 
tisering neemt op dit moment nog altijd 
een grote vlucht en de computer zal nog 
heel wat arbeidsplaatsen overnemen, of je 
het nu leuk vindt of niet. Uiteindelijk is één 
van de weinige terreinen waar nog volop 
werk te vinden is, de automatiseringssec- 
tor zelf. Hoe langer hoe meer bedrijven, en 
vooral ook de kleinere, maken tegenwoor- 
deig gebruik van computers. Personal 
computers! 

Stel jenu eens voor, dat je je homecompu¬ 
ter voor het spelen van aardig spelletjes 
gebruikt, en af en toe zelfs om een klein 
programma te schrijven. Dan sta je op het 
punt de boot op een misschien wel heel 
pijnlijke manier te missen. Je bent namelijk 
niet meer bang voor de computer en echt 
daarmee heb je een voorsprong op een 
heleboel andere mensen. Toch zullen de 
meeste bedrijven bij het aannemen van 
personeel eerder de voorkeur aan iemand 
geven die met een PC overweg kan, dan 
aan iemand die alleen weet om te gaan 
met een huiscomputer. 


Ook zonder speciale voorkennis of oplei¬ 
ding is het mogelijk op de cursus tot het 
einde toe te kunnen volgen, maar een 
beetje (huis)computerervaring is natuurlijk 
nooit weg. 

Cursusboek 

Er komen 12 televisie- en 12 radio-lessen 
van de cursus ’Personal Computer’. Het 
volgen van de lessen is natuurlijk gratis, 
want je hoeft alleen maar de televisie (of 
radio) aan te zetten. Maar Teleac brengt 
ook een cursusboek uit. Een fraaie ring¬ 
band, met 300 pagina’s interessante tekst 
en kleurrijke illustraties. Dit boek is te 
bestellen bij Teleac, door fl.85.- over te 
maken op giro 544232 t.n.v. Teleac, 
Utrecht, met vermelding van 'Cursus Per¬ 
sonal Computer.' 

De eerste televisieles is inmiddels op 20 
januari j.l. uitgezonden, maar wordt op 10 
februari herhaald. De tijden waarop de 
radiolessen kun je in alle omroepgidsen 
vinden. Teleac vertelde ons dat er vol¬ 
doende lesboeken voorhanden zijn, hoe¬ 
wel de respons op de cursus nu al buiten 
proprties is. Wees er dus snel bij, als je de 
cursus volgen wilt, want het is zeker de 
moeite waard. 
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Activision heeft weer eens iets totaal anders! De ontwerpéi^V : ^rJ, , J pii' < Amerikaanse 
softwarehuis, dat in ons land door Ariolasoft wordt hebben het 

ouderwetse poppenhuis en de fantasiewereld van het kibt|d^ pmffeen een nieuwe 
digitale basis gegeven. Gemakkelijk op te ruimen d^^è|allé.li)8ftijd@n. 

i : ‘fSSpT : 

Er leeft iets 3 1 '1 


in mijn computer... 


Little computer people : meer dan een 
computer-poppenhuis van Activision 


A ls redacteuren van een serieus 
computerblad laten wij ons niets 
wijsmaken. Wat betekenden al 
die vreemde berichten van Acti¬ 
vision, waar hadden 2 e het over? 
Maar gelukkig, na enig aandringen kre¬ 
gen wij als eersten in Nederland toe¬ 
gang tot de streng geheime rapporten 
(zie kader). 

We moesten dus een huis gaan maken in 
onze 64, maar daar we geen architekten 
zijn en niet wisten hoe je zoiets moest 
bouwen, riepen wij hiervoor de hulp van 
het Activision researchteam in. Ons 
nieuwe stulpje werd ons weldra op disket¬ 
te aangeleverd. Wij doopten dit op voor¬ 
hand Huize Eeuwig Leeg, dit daar wij heus 
niet zo naief waren om in mannetjes, die in 
computers leven te geloven. Maar goed, 
toch wel een beetje nieuwsgierig laadden 
wij het "huis op een disk” programma in. 

Aanwijzingen volgen 

Na even te hebben gewacht, verscheen er 
een notitieblok op het scherm. De aanwij¬ 
zingen opvolgend, typten wij onze naam, 
de datum en de tijd in. Daarna ging de 
diskdrive aan het werk en kwam ons huis in 
beeld. Het was een doorsnee van een, van 
alle gemakken voorzien, woonhuis dat zich 
het beste met een poppenhuis laat verge¬ 
lijken. 

En... er gebeurde helemaal niets, precies 
zoals we eigenlijk al hadden verwacht. Net 
toen we, na zo’n vijf minuten, de computer 
wilden uitzetten, werd er gebeld. Uit pure 
verbazing vergaten we te reageren. 

Na eerst beleefd nogmaals te hebben ge¬ 
beld, stapte er een klein persoon net huis 
in. Eerst schuchter om zich heen kijkend 


en langzamerhand zelfverzekerd inspec¬ 
teerde hij het huis. Kritisch onderzocht hij 
alles, van de inhoud van de laden tot aan 
het toilet. Na een paar minuten verliet hij 
echter het huis en trok de deur achter zich 
dicht. 

Teleurgesteld bespraken we de situatie, 
we hadden waarschijnlijk zojuist het eerste 
en meteen laatste contact met het manne¬ 
tje in onze computer gehad. Gelukkig had¬ 
den we voor de zekerheid nog even ge¬ 
wacht met het uitzetten van de computer, 
want hij kwam terug en hoe. Met een grote 
koffer kwam hij binnen, op de voet gevolgd 
door een hondje. 

Hij heet Alvin 

We verzorgen hem nu enige tijd. Hij heet 
Alvin, dat bleek uit de briefwisseling die we 
voerden. Alvin is keurig opgevoed, hij 
poetst zijn tanden en vanzelfsprekend 


wast hij ook zijn handen als hij naar het 
toilet is geweest. Af en toe gaat hij ook in 
bad. Verder luistert hij ook naar ons, maar 
dan moet je wel ”please” in je vraag zetten. 
Toen we hem laatst vroegen om de "Jingle 
Bells” plaat op te zetten, daar het Kerstmis 
was, deed hij dat niet alleen, hij danste er 
ook nog bij. Na afloop hebben we hem met 
de bestuurbare electronische hand, die 
aan de muur hangt geknuffeld.Wel vinden 


Leuk, vernieuwend, echt niet alleen 
voor kinderen, van zeer goede grafi¬ 
sche kwaliteit en absoluut een pro¬ 
gramma om te beleven. 


we het triest dat hij de open haard niet wil 
gebruiken, dit ondanks de brieven en tele¬ 
foongesprekken die we daarover met hem 
hebben gevoerd. We spelen ook spelletjes 


_____Researchprojeet 

Deze maand ontvingen wij van Activision een geheim rapport. Een van hun 
researchteams, bestaande uit Sam Nelson, David Crane, Hilary Mills, Adam 
Beltin en Russwtl Lieblich, heeft een doorbraak in hun onderzoek naar compu¬ 
terstoringen weten te bewerkstelligen. 

Hun onderzoek betrof voornamelijk de kleine en onverklaarbare problemen, die men 
zo nu en dan met zijn computer heeft. De conclusie van het team: er leven kleine 
wezens in computers! 

Deze wezens, die zij ’dwellers’ en ook wel LCP’s (Little Computer People) noemen, 
zouden in iedere computer voorkomen. Het researchteam dat het bestaan van deze 
wezens, op louter theoretische gronden, reeds langere tijd vermoedde, had op velerlei 
wijze contact met hun geprobeerd te maken. Hun experimenten, door bv. datacom¬ 
pressie, power surges en irriterende software routines, bleven echter in het begin 
zonder resultaat. 

Maar tenslotte bleek, dat je om in contact met een ’dweller’ te komen een huis moest 
bouwen, een huis in je computer(geheugen), dat wel. En met een beetje geluk 
wandelde het wezentje er dan binnen en ging erin wonen. 

Grote uitvindingen berusten op logica en eenvoud. 
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met Alvin, zoals poker en proberen met 
hem een begrijpelijk telefoongesprek te 
voeren, maar dat laatste lukt niet erg, zijn 
taaltje is vrijwel onverstaanbaar. 

Laatst gebeurde er iets, dat we zeker niet 
verwacht hadden, We waren vergeten, de 
computer uit te doen en Alvin moest het 
toen zonder water en verzorging stellen. 
Toen we er achter kwamen, was hij intus¬ 
sen behoorlijk ziek geworden. Gelukkig 
hadden we hem na vier glazen water en 
twintig minuten aandacht weer helemaal 
gezond en tevreden. Wil je hem echter 
naar bed zien gaan, dan zul je enig geduld 
moeten oefenen, dat duurt wel een tijdje, 
Alvin is een bezig mannetje. 

Alvin heeft iets "echts” over zich en is op 
zijn minst veel interactiever dan een pop¬ 
penhuis. Wel is het jammer, dat zijn briefjes 
alleen in het Engels zijn. 

Begint u een beetje te begrijpen, wat dit is? 
Little Computer People is een nieuwe 
rage, een toepassing van de huiscomputer 
in de echte zin van het woord, namelijk als 
de HUIS-computer voor een vriendje, 
waarmee je kunt communiceren en dat 
een eigen leventje kan leiden. 

Wie overigens eenmaal van start is gegaan 
met een figuurtje, kan niet opnieuw begin¬ 
nen, de draad van het verhaal is niet meer 
terug te draaien, per spel is er één unieke 
versie ontstaan. Op diskette f69,-, maar 
ook op cassette verkrijgbaar voor f 49,- 


Andere nieuwe Acti- 
vision produkten 

Een bezoek aan Activision in Silicon Valley 
is tegenwoordig minder spannend dan in 
de hoogtijdagen van de videogames. Toen 
werkten er 400 mensen en was het een 
zoemende bijenkorf, nu is de staf nog maar 
75 personen groot en is bijvoorbeeld het 
bedrijfscafetaria nu ook maar opengesteld 
voor de werknemers van Sun, die om de 
hoek hun kantoren hebben. Gesprekken 
met Activision topmensen geven ook wel 
aan, dat men zich beperkt tot het maken 
van de betere computerspelen voor een 
beperkt aantal machines, daar een tamelijk 
hoge prijs voor wil hebben, en geen experi¬ 
menten buiten dat gebied meer wil doen. 
Men vormt, samen met Bröderbund, Epyx 
en Electronic Arts, de eredivisie van de 
recreatieve software-huizen in de VS en is 
daar meer dan tevreden mee. Terecht, 
want men heeft een aantal hele goede 
produkten uitgebracht, al blijkt men er ook 
wel eens naast te zitten. 

Een van de spelletjes, die ons minder kon 
bekoren, is Alcazar, een grafisch avontuur, 
waarbij men een hele reeks forten met 
ingewikkelde kamers en vijanden, valstrik¬ 
ken en schatten moet doorworstelen. Zeer 
complex, maar het komt erop neer, dat de 
speler gewoon een soort puzzel oplost, 
daarbij moet onthouden hoe in een be¬ 
paald kasteel te handelen om er veilig 
doorheen te komen. Qua opzet dus een 


klassieke beeld-adventure met actiemo¬ 
menten, met een quasi-driedimensionale 
vorm (van bovenaf), maar zonder echte 
verrassingen. 

Alter Ego 

Dit programma heeft wel degelijk iets origi¬ 
neels, het is een psychodrama, waarbij de 
speler een andere persoonlijkheid op het 
scherm kan creëren. Spelen met de psy¬ 
chologie, het simuleren van andere eigen¬ 
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schappen en misschien valt daar ook nog 
wel iets uit te leren. In het Engels en 
gebaseerd op een tamelijk simpel psycho¬ 
logisch mensbeeld, maar soms toch met 
verrassende wendingen en conclusies. 
Voor wie geen afspraak met een psychia¬ 
ter nodig denkt te hebben! 


Zenith monitoren. Een lust voor het oog. 



Uit het breedste PC assortiment ter wereld komen de beste monitoren 
Zenith monitoren. Geschikt voor vrijwel alle personal computers. Kleur 
of monochroom (met groen of amberkleurig scherm). Haarscherpe beeld¬ 
kwaliteit. Moderne styling. Een lust voor het oog. Bovendien zijn Zenith 
monitoren prettig geprijsd. Bel Zenith voor het adres van de dichtstbijzijnde 
dealer. 
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Zenith Data Systems, Utrechtseweg 370,3731 GE De Bilt, tel. 030-7658' 
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Hardware sleutelaars zullen hun voordeel kunnen doen 
met de volgende tips van Wim Wubs, die deze extra’s zelf 
ontwikkelde en ook naar tevredenheid gebruikt. 


Dubbele 

resetknop 


Wanneer men veel met een disk-drive of 
printer werkt, met name als het om zelfge¬ 
schreven programma’s gaat, kan het nog 
wel eens gebeuren dat de disk-drive of 
printer vastloopt. De diode die op dit mo¬ 
ment alleen in de nieuwste modellen aan¬ 
wezig is zorgt ervoor dat de computer van 
buitenaf niet gereset kan worden. Volgens 
bijgaand schema kunnen 2 resetknoppen 
ingebouwd worden. 
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Met resetknop 1 kan de computer plus 
randapparatuur gereset worden, de com¬ 
puter hoeft niet te worden utgeschakeld 
zodat het geheugen intact blijft. 

Met resetknop 2 wordt alleen de randap¬ 
paratuur gereset. Het voordeel van een 
tweede resetknop is dat bijvoorbeeld de 
disk-drive na een foutmelding of bij een 
verkeerde instructie direkt gereset kan 
worden. Het vlug aan en uitschakelen van 
computer apparatuur is erg ongezond, 
omdat vol geladen afvlak condensatoren 
de spanningspieken niet meer absor¬ 
beren. 

De middelste penfpen 6) van de seriële 
plug wordt doorgeknipt en van elkaar af¬ 
gebogen. Over deze verbreking wordt nu 
een kleinsignaal diodefln 4148) gesol¬ 
deerd met het kathodestreepje naar onde¬ 
ren. Aan beide punten komen nu de reset- 
schakelaars die tevens met massa (GND) 


zijn verbonden. De tweede uitbreiding is 
een status indicatie die veel informatie 
geeft over de situatie waarin de computer 
verkeert. Bij het inschakelen licht de led 
rood op, is het systeem ready dan wordt 
de led groen.Wordt de led niet groen dan is 
het systeem niet goed opgestart of de 
randapparatuur deugt niet, dit is ook zo 
wanneer de led niet eerst rood wordt. Bij 
laden en saven licht de led na elke block 
even 1 maal op en bij een disk-commando 
die afgesloten wordt met close blijft de led 
rood totdat de drive klaar is. Het gebruik 
van 1 led in plaats van 2 heeft de volgende 
voordelen: 


$num-po*r 



.ff/v tfteMovsH Konr os 
D/ODE met Q£- MTHöOS- 
ÏETREEpjEj 8ëA'£(VA' 

Tijdens saven met de cassetterecorder is 
de led oranje. Bij het laden met recorder 
weet u ook of er een programma aankomt 
omdat de led pas geel wordt als er infor¬ 
matie gelezen wordt, wat heel handig is. 


De led geeft nog veel meer informatie maar 
dat leert de ervaring wel! Het belangrijkste: 
blijft de led rood tijdens een programma of 
tijdens het laden terwijl de drive nog draait, 
geef dan maar rustig een totale reset, want 
de computer zit zo vast als het maar 
kan.Voor de duidelijkheid, de led moet dan 
continu helder rood zonder enige variatie 
branden. 


IRQ- f»Nij vu- 19 ) 



De bouw: 

Van een ic-voetje worden de benodigde 
pootjes (1-4,7,14) volledig omgebogen en 
de rest wordt minder ver omgebogen. 
Bevestig het ic-voetje op een geschikte 
plek in de computer door de ongebruikte 
pennen in het plastic te smelten met een 
kleine soldeerbout, de overige pennen 
worden volgens het schema met 
+5V.GND en IRQ verbonden en de led met 
de twee serieweerstanden wordt erop 
aangesloten. Is dit gebeurd dan wordt het 
ic7404 (inverters) die direct de led kan 
sturen op de juiste manier in het voetje 
gedrukt. De led dient zo aangesloten te zijn 
dat hij groen oplicht als de computer nor¬ 
maal aanstaat. 

Opmerking: neem voor het ic een stan¬ 
daard TTLtype. In het Commodore 64 
handboekje staat de cartridge-connector 
afgebeeld volgens vooraanzicht. Als men 
de achterkant bekijkt van de CBM 64, dan 
lopen de pennen 1 -22 en A-Z van rechts 
naar links. • 
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Er zijn voor de Vic en 64 schaakprogramma’s in vele uitvoeringen te koop. Ook zijn er 
speciale schaakcomputers te kust en te keur. Over waar je bij de aankoop van een 
electronische schaakmeester op dient te letten gaat het nu volgende artikel. Wil je een 
sparringpartner om te leren schaken, een echte kampioen tegenover je of ontbreekt 
een schaakprogramma alleen maar in je software- verzameling. 


COMPUTERSCHAKEN 

De Commodore als 
grootmeester 

Schaken met het toetsenbord 


S chaken is al vele eeuwen lang 
een geliefde denksport. Dat ge¬ 
compliceerde spel automatise¬ 
ren is een van de grote uitdagin¬ 
gen aan de techniek. Vroeger 
stopte men al dwergen in schaakauto- 
maten om den volke te misleiden, te¬ 
genwoordig is de computer er goed 
voor. 

Waarom computerschaken? 

Het schaken met een computer stuitte in 
het begin menig schaakliefhebber tegen 
de sportieve borst. Een echte menselijke 
tegenstander is toch een realistischer en 
gezelliger alternatief dan zo’n voorgepro¬ 
grammeerde computer? Inderdaad heeft 
een menselijke opponent ook zijn of haar 
aantrekkelijke kanten, maar daarbij biedt 
het electronisch schaken toch een aantal 
interessante alternatieven: 

O De tegenstander is altijd klaar voor de 
strijd. Ook middden in de nacht. 

0 De computer maakt geen domme ver¬ 
gissingen en ziet ook geen onvoorzichti¬ 
ge zetten van de speler over het hoofd. 
Daarmee wordt de factor toeval flink 
gereduceerd en krijg je een goed inzicht 
in het eigen schaakniveau. 

0 Het moeilijkheidsniveau is vooraf instel¬ 
baar. 

©Schaakcomputers vinden probleem¬ 
analyses geen enkel bezwaar. De door 
de vragensteller ingevoerde opstelling 
wordt geduldig geanalyseerd en be¬ 
proefd, waarna de beste oplossing 
volgt. Deze kun je dan met de eigen 
ideeën vergelijken. 

©Je kunt de partij naar believen op elk 
moment onderbreken en/of saven. 


Een speciale schaakcomputer 
of -software? 

Er zijn zowel aparte schaakcomputers als 
schaak-software voor de micro. Welke de 
voorkeur geniet is van diverse factoren 
afhankelijk. Daar de schaakregels relatief 
duidelijk en vast van opzet zijn kost het 
programmeren van een correct schaak¬ 
programma qua zetten weinig moeite. 
Waar het echter op aankomt zijn het aantal 
variaties, mogelijkheden en het be¬ 
dieningsgemak van de computertegen- 
stander. 

Echte schaakcomputers en -software voor 
de hobbycomputer variëren van eenvoudi¬ 
ge beginners tot een echte grootmeester- 
klasse. Beginnersoutfits kennen minder 
spelvariaties dan hun meer geavanceerde 
collega’s en zijn nogal eens tergend lang¬ 
zaam bij het beantwoorden van gedand 
zetten. Een topmodel beschikt over vele 
duizenden referentiepartijen en overziet 
een groot aantal zetten binnen een fractie 
van een seconde. De superschaakcompu- 
ter Hitech, van de Carnegie-Mellon Uiver- 
siteit in Pittsburgh, beschikt inmiddels offi¬ 
cieel over de meestertitel. Hitech kan 
175.000 zetten per seconde bekijken (dat 
is 50% meer dan de beste commerciële 
schaakcomputer) en haalde over de afge¬ 
lopen vijf maanden gespeelde winst- en 
verliespartijen een score van 2250 officiële 
ELO-wedstrijdpunten. Wereldkampioen 
Kasparov heeft ruim 2800 punten, dat is 
550 punten meer of wel nog heel wat 
jaartjes door programmeren. Professione¬ 
le schaakcomputers als de Hitech zijn het 
werk van jarenlang partijen programmeren 
en systeem ontwerpen. Er is zelfs een 



flinke dosis kunstmatige intelligentie aan¬ 
wezig. 

Huiskamermodellen 

De superschaakcomputer is niet alleen 
snel, maar ook slim en tactisch. Dergelijke 
specificaties vinden wij natuurlijk niet op 
schaakmachines voor huisgebruik. Zij 
zouden onbetaalbaar worden, terwijl het 
niveau nutteloos hoog zou zijn. Toch blijft 
het verstandig qua snelheid en tactische 
variatie voor een duurdere uitvoering te 
kiezen. Die zal minder gauw vervelen dan 
een eenvoudiger en goedkoper model! 

Je beschikt over een echt speelbord en 
figuren of symbolen voor de zetten. Bij je 
hobbycomputer is het turen naar het 
beeldscherm en intypen geblazen. Vooral 
dat intypen kan de speler bij de eenvoudi¬ 
ger uitvoering zuur opbreken. Veel effec- 
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tiever en gemakkelijker werkt het gebruik 
van de cursortoetsen of joystick. Een an¬ 
der punt is dat schaakcomputers dikwijls 
over meer indicatie-mogelijkheden be¬ 
schikken. Bijvoorbeeld het aangeven van 
(door de computer of zelf) te nemen zetten 
en bedreigde stukken met LED’s. En dan 
kun je zo’n kompakte schaakcomputer 
ook nog eens makkelijk mee op reis 
nemen. 

Goede schaaksoftware 
relatief goedkoop 

Tegen de aanschaf van de echte schaak¬ 
computer pleit de aanzienlijk lagere prijs 
voor software op gelijkwaardig spelni- 
veau. Dat kan op het gevorderde- en tour- 
nooiniveau zelfs vele honderden guldens 
schelen. 


Een sterke troef van echte schaakcom¬ 
puters is het gebruiksgemak. 


Voor ons computerbezitters die af en toe 
eens een lekker potje schaak willen spelen 
is de keuze gemakkelijk. 

De ware schaakliefhebber zal daarentegen 
de geboden voordelen tegen de kosten 
dienen af te wegen. Goede schaakcompu¬ 
ters zijn o.a. de machines van Mephisto, 


Constellation en de Conchess Monarch 
apparaten. 

Schaaksoftware 

Het aanbod aan schaaksoftware voor de 
huiscomputer mag redelijk groot genoemd 
worden. Alles vanaf eenvoudige huistour- 
nooitjes tot meesterklasse, al dan niet 
voorzien van 3D-graphics en/of spraak¬ 
synthese is beneden de ƒ 200,- verkrijg¬ 
baar. De geboden kwaliteit loopt echter 
sterk uiteen. Daarom is het verstandig 
schaaksoftware eerst in de winkel of bij 
kennissen uit te proberen alvorens tot de 
aankoop over te gaan. 

Een van de bekendste schaakspelen voor 
de C-64/128 is Colossus 4.0. De gebruiker 
hiervan kan de software-strategie binnen 
zekere grenzen naar behoefte aanpassen. 
Ook maakt het programma het mogelijk 
om de gedachtengang van de computer 
op het beeldscherm te volgen. Verder 
biedt het programma ondermeer Windspe¬ 
len, probleemanalyse, een schaakklok, zes 
verschillende speelvarianten (o.a. tour- 
nooi-, snelschaak en blindschaakmodus) 
en 3D-graphics naar keuze. Het program¬ 
ma kost c.a. ƒ 59,-. Kwalitatief goede maar 
iets duurdere schaakpakketten zijn bij¬ 
voorbeeld Sargon III en Chess 7.0. 

Chess 7.0, dat rond de tweehonderd gul¬ 
den kost, is een goede beginnerskeuze en 
behoorlijk gebruiksvriendelijk. Het pro¬ 


gramma kan voorbeeldzetten doen en be¬ 
dreigde stukken aanwijzen. Ook kun je de 
40 laatst gedane zetten alsnog herzien. 
Sargon III is op de meer gevorderde speler 
gericht en komt kompleet met 107 mees- 
terpartijen en een bibliotheek met meer 
dan 68.000 openingsvarianten. Ook dit 
programma laat zich eenvoudig bedienen 
en kan net als bij de beide vorige pakketten 
zetten en partijen opslaan. Verder kun je 
als bijzonderheid nog een printeruitdraai 
van de opstelling laten maken. 

Al wat langer op de markt vertoeft Grand- 
master dat ook in een C-16 en VIC20 
uitvoering verkrijgbaar is. Grandmaster 
kost omstreeks de 50 gulden. Het pro¬ 
gramma is beperkter en minder gebruiks¬ 
vriendelijk dan de hiervoor besproken soft¬ 
ware. De ontwerpers bij Kingsoft hebben 
ondertussen schijnbaar een meer up to 
date versie gemaakt die binnenkort lever¬ 
baar wordt. 

Schaakcomputers en software lenen zich 
goed voor het zich thuis bekwamen tot 
schaak(groot)meester of als plezierig tijds- 
verdrijf. Je echt waar maken kan momen¬ 
teel in Nederland slechts tegen een men¬ 
selijke opponent. In het buitenland zijn er 
echter al tournooien waar je het tegen een 
meester-schaakcomputer mag opnemen. 
En die kunnen de menselijke grootmees¬ 
ters echt het zweet op het voorhoofd 
brengen! • 


ESIZIZIIM 

AUTHORIZED COMMODORE REPAIR CENTRE 

is verhuisd! 

Voor reparatie van: 

Cl 28, C64, Cl 6, VIC20 

MONITOREN, PRINTERS, DISC DRIVES 

en 

PC10, PC20 

voortaan naar: 

Antoniuslaan 1,3341 GA H.[.Ambacht 

telefoon 01858-12766 


Databas» 3.0/3J 
voor diskette 

Databasis 3.0 is eenvoudig te 
bedienen maartoch een zeer 
krachtige, veelzijdige en universele 
kaartenbak. Met dit programma kan 
iedereen zijn eigen bestand 
samenstellen voor b.v. adressen 
ledenadministratie, piaten etc. 

Alle mogelijkheden zoals sorteren, 
opzoeken, wijzigen, verwijderen, 
tabellen uitprinten etc. zijn 
ingebouwd. Ook voor een printer zijn 
uitgebreide faciliteiten in het 
programma opgenomen, 
bijvoorbeeld. Centronics interface, 
stickers printen, onder of naast elkaar 
printen, codes naar de printer sturen 
etc. 

Voor Commodore 64. 


DoorC. Kramer 


Andere kwaliteitsprogramma's van 
RadarSoft voor uw CBM64 zijn: 

• De grotten van Oberon • Eindeloos 

- Topografie Europa/Wereld/div. landen 

- Tempo typen ■ Rekenwonder 

- Letterstress - Radarbasic 50K 

• Databasic ■ Steen der Wijzen 

- Tijdreiziger • Anonimus ■ Horror Hotel 

- Nautilus • Zone 7. 










Ondanks de vrij krachtige BASIC 7.0 van de C-128 blijft PASCAL een aantrekkelijke 
programmeertaal. Sinds kort is de krachtige Turbo-versie van Pascal van het soft¬ 
warehuis Borland ook voor de C-128 Een kort overzicht der mogelijkheden van deze 
snelle Pascal telg. 


TURBO-PASCAL VOOR 
DE C-128 


Programmeertaal met stijl en snelheid. 


P rogrammeertalen komen en 
gaan, maar slechts enkele blij¬ 
ven echt populair. Pascal draait 
sinds de introductie door Niko- 
laus Wirth (die ook Modula ont¬ 
wierp) al heel wat jaartjes mee en kent 
tal van aanhangers. Anders dan BASIC 
vereist en geeft Pascal aanzienlijk meer 
structuur aan de programma’s. 

Bij BASIC kan men zelfs met een vrij 
chaotische programmeer-stijl een toepas¬ 
sing aan het draaien krijgen, waarbij de 
ontwerper er maar op los kan programme¬ 
ren met GOTO’s naar alle hoeken van het 
programma en terug. 

Met dit laatste komt men bij PASCAL niet 
ver, want de structuur is sterk probleem 
gericht. 

Pascal leent zich dus uitstekend voor het 
gestructureerd en logisch oplossen van¬ 
problemen. Voor grafische toepassingen 
is deze taal helaas minder geschikt. Zoals 
de naam Turbo al aangeeft betreft het hier 
een snellere versie van twee andere be¬ 
kende Pascals: Oxford- en Profi-Pascal. 
Bovendien beschikt de Turbo-vorm over 
een aantal extra commando’s: 
t ABSOLUTE, voor het vastleggen van 
variabelen op absolute geheugenadres- 
sen. 

| EXTERNAL, voor het oproepen van in 
Assembler geschreven en afzonderlijko- 
vergezette procedures en functies. 

| INLINE, voor het direkt integreren van 
machinetaal in Pascal, 
t QHIVSHR voor de DOS. 
t Men behoeft de strings niet zelf meer te 
definiëren, want het datatype STRING is 
standaard voor handen. 


| OVERLAY: Voor het compileren van Pa¬ 
scal procedures en functies als overlay- 
files. 

t En een groot aantal standaard konstan- 
ten, - procedures en -functies. 


Overlay-Techniek 

Turbo-Pascal maakt het mogelijk om zon¬ 
der problemen machinetaal of andere pro- 
grammataalblokken vanuit het Pascal zelf 
te laden en te starten. Met sommige proce¬ 
dures kan de programmeur zelfs Basic 
Input/Output Systeem (BIOS)-, BasicDisc 
Operating System (BDOS)- en CP/M-routi- 
nes inbouwen en/of oproepen. Deze laat¬ 
ste optie maakt via de BIOS, BIOSHL, 
BDOS en BDOSHL Pascal volledig com¬ 
patibel met het CP/M-besturingssysteem. 
Zoals gezegd kunnen Pascal procedures 
of functies m.b.v. "OVERLAY” gecompi¬ 
leerd worden. Dat scheelt flink in de ge¬ 
heugenruimte. Na het aanroepen van een 



functie of procedure wordt het desbetref¬ 
fende Overlay File datablok geladen en 
uitgevoerd. Een effectieve werkmethode. 


Turbo Pascal op de C-128 

Turbo Pascal draait onder CP/M en daar¬ 
om dient dit besturingssysteem eerst van 
de boot-diskette te worden geladen. Hier¬ 
voor is de 1541 drive helaas minder ge¬ 
schikt. De nieuwe 1570 drives doen het 
daarentegen uitstekend. Vervolgens kan 
de Pascaldiskette geladen worden. 

Het commando DIR geeft het Directory 
met: 

TURBO.COM, de compiler (32KB); 
TURBO.OVR voor de overlay; 
TURBO.MSG voor de compilermeldingen; 
TLIST.COM, voor het listen via de printer; 
En READ ME, een informatie file over de 
werking van Turbo-Pascal. 

Een aardige bijkomstigheid is dat de edit- 
commando’s van de Pascal-Editors iden¬ 
tiek zijn aan de commando’s van de onder 
CP/M draaiende tekstverwerker "WORD¬ 
STAR”. Zelfs de toets functies komen 
overeen. Zo heeft de gebruiker toegang tot 
een werkelijk professionele tekstver¬ 
werker. 

Tot slot de snelheid van Turbo-Pascal. De 
compiler is de snelste van alle voor de C- 
128 verkrijgbare Pascal-compilers. Zij is 
c.a. 7 maal sneller als die van Oxford 
Pascal. 


Turbo-Pascal is een produkt van Borland 
International en kost c.a. f 250, -. 
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Basic-Basis deel 2 


Om meer te kunnen gaan doen met onze trouwe Commodore-computer zijn we in het 
vorige nummer gestart met een cursus voor de beginnende computeraar. We 
behandelen eerst de meest eenvoudige Basic opdrachten en commando’s, zodat ook 
de volslagen leek op Basic gebied niet hoeft te aarzelen om mee te doen. Ook zij, die 
onlangs een C-16 hebben aangeschaft kunnen erg veel leren van deze serie. De cursus 
is erop gericht om tijdens het lezen en leren zelf al kleine toepassingen in Basic te 
kunnen gaan schrijven. In deze aflevering verbreedt Jan Bodzinga de Basic-basis door 
het bespreken van een paar nuttige programmeer opdrachten en verder te kijken naar 
het gebruik van Basic-variabelen en de direkte kommunikatie tussen de gebruiker en 
het programma in de computer. 


Basis Basic 


deel 2 





O m de opgedane kennis van de 
eerste les nog wat op te halen, 
kijken we eerst even terug naar 
de hoofdpunten uit deel 1. De 
vorige keer hebben we kennis 
gemaakt met een paar belangrijke 
Basic-woorden. 

Deze opdrachten of commando’s kunnen 
we op twee manieren gebruiken. We kun¬ 
nen direkt een commando op het toetsen¬ 
bord intypen, zonder een regelnummer, 
waarna de Commodore de bewerking die 
door dit commando wordt verlangd me¬ 
teen zal gaan uitvoeren. De tweede en 
belangrijkste mogelijkheid is de program- 
meer-stand van de Commodore, de ’pro- 
gramming mode’. Daarvoor typen we de 
Basic-opdrachten in op het toetsenbord, 
maar laten ze vooraf gaan door een getal, 
het regelnummer. De computer weet dan, 
dat de programmeur bezig is een program¬ 
ma in te typen, en doet op dat moment niet 
anders dan de ingetypte regels in z’n ge¬ 
heugen bewaren, totdat er een direkte 
opdracht wordt gegeven om het ingetypte 
programma uit te voeren. 

Om dit wat duidelijker te maken een voor¬ 
beeld. We kennen inmiddels de Basic op¬ 
drachten/commando’s NEW, RUN en 


PRINT. Als we daarmee een programma 
zouden maken, heeft de Commodore daar 
geen enkel bezwaar tegen. Maar omdat 
b.v. NEW betekent dat het aanwezige pro¬ 
gramma uit het computergeheugen moet 
worden verwijderd, heeft het geen zin deze 
opdracht als een commando in het pro¬ 
gramma te zetten. Het programma ver¬ 
nietigt daarmee zichzelf. Probeer het maar 
eens. 

10 PRINT ”Commodore-INFO” 

20 NEW 

Typ nu RUN om dit kleine programma te 
laten uitvoeren. Het werkt perfect, want op 
het scherm zien we netjes de tekst uit regel 
10. Maar wil je een tweede keer dit pro¬ 
gramma laten runnen dan gebeurt er niets 
meer, want door de verwerking van NEW in 
regel 20 is het hele Basic-programma uit 
het geheugen verdwenen. Als beveiliging 
tegen meerdere keren runnen is de truuk 
wel leuk, maar je begrijpt dat NEW en RUN 
vooral bedoeld zijn om als Basic- opdracht 
te worden gebruikt. 

Een andere mogelijkheid is regel 20 te 
vervangen door 20 RUN. Het effect van 
deze wijziging moet je nu weten, zonder 
zelfs het programma te runnen. 


Listen van programma’s 

We gaan verder met de Basic-opdracht 
LIST. LIST is ook zo’n woord, dat speciaal 
is bedoeld voor de programmeur, en niet 
voor de uiteindelijke gebruiker van het 
programma. Met LIST kunnen we het Ba¬ 
sic programma dat in de Commodore aan¬ 
wezig is uitLISTen, zodat we alle program¬ 
maregels, netjes op volgorde van laag naar 
hoog op het scherm voorbij zien flitsen. 
Een erg handige opdracht waar je als 
programmeur veel plezier van zult hebben. 
Om dit wat uit te diepen schrijven we eerst 
een programma, waarmee we de LIST 
opdracht zullen onderzoeken. 

Typ de volgende regels maar eens in, in 
dezelfde volgorde als hieronder en vergeet 
vooraf het commando NEW niet. 

10 REM TESTPROGRAMMA 2/2 
90 END 

60 PRINT 40 * 50 * 60 * 70 
50 PRINT 
30 PRINT 
70 PRINT 

80 PRINT ” EINDE PROGRAMMA ” 

20 PRINT ” BEGIN PROGRAMMA ” 

40 PRINT ” REGEL 40 ” 

Als we deze regels hebben ingetypt, en 
iedere regel met RETURN hebben afgeslo- 
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ten, zit dit programma in het geheugen van 
de Commodore. Maar de enige controle 
die we daar over hebben is op dit moment 
het scherm, waar we de regels in de volg¬ 
orde zoals we die hebben ingetypt, nog 
kunnen lezen. Bij een groter programma 
verdwijnen de eerste regels zelfs automa¬ 
tisch bovenaan van het scherm, en zijn dan 
helemaal niet meer na te lezen of te contro¬ 
leren. Bovendien zijn de regels van dit 
voorbeeld niet in de juiste volgorde inge¬ 
typt, zodat het testen van dit programma 
zoals het nu op het scherm staat, niet erg 
overzichtelijk is. 

Nu kunnen we de opdracht LIST goed 
gebruiken. Typ maareens LIST en daarna 
RETURN. Het resultaat is dan: 

10 REM TESTPROGRAMMA 2/2 
20 PRINT ” BEGIN PROGRAMMA ” 

30 PRINT 

40 PRINT ” REGEL 40 ” 

50 PRINT 60 PRINT 40 * 50 * 60 * 70 
70 PRINT 

80 PRINT ” EINDE PROGRAMMA ” 

90 END 

Het eerste dat je meteen zal opvallen, is de 
volgorde waarin de regels nu op je scherm 
verschijnen. De Commodore heeft auto¬ 
matisch de regelnummers van laag naar 
hoog gerangschikt en van de manier waar¬ 
op je ze hebt ingetypt is niets meer te 
bespeuren. Dat is één van de dingen die 
zondermeer gebeuren na het intypen van 
Basic-programmaregels. Verder zie je, dat 
er (bewust) een stapgrootte van 10 tussen 
alle regelnummers is genomen, zodat je, 
als het nodig is, nog een paar regels kunt 
tussenvoegen. Want een regelnummer in 
een programma hoeft natuurlijk niet per se 
deelbaar te zijn door 10. Wil je b.v. tussen 
regel 70 en 80 nog een extra regel met een 
PRINT-commando voegen, dan typ je : 

75 PRINT ” REGEL 75 ” 

en daarna geef je weer LIST en je ziet, dat 
deze regel netjes tussen regel 70 en 80 is 
ingeschoven. Bij het uitvoeren van dit test¬ 
programma, wordt deze regel ook op die 
plaats uitgevoerd, en niet als laatste com¬ 
mando, al heb je regel 75 wel als laatste 
ingetoetst. 

Maar het uitlijsten van een heel program¬ 
ma is lang niet alles wat je met LIST kunt 
doen. Er zit veel meer achter deze op¬ 
dracht. 

Je kunt achter het woord LIST nog een stel 
'parameters’ in de vorm van regelnum¬ 
mers intypen, voordat je op RETURN 
drukt. De officiële vorm van deze opdracht 
is: 

LIST (beginregel) - (eindregel) (RETURN) 


Als begin- en eindregel kun je elk geldig 
regelnummer intypen, wat je maar wilt. De 
nummers hoeven niet eens in je program¬ 
ma voor te komen. LIST zal daarop de 
regels vanaf de opgegeven beginregel tot 
en met de eindregel op je scherm zetten. 
Typ je in ons programma bijvoorbeeld 
LIST 30 - 73 (RETURN) dan krijg je de 
programma-lijst vanaf regel 30 tot regel 70 
op je scherm. Omdat je regel 73 als eindre¬ 
gel hebt opgegeven, die niet in je program¬ 
ma voorkomt, zal LIST de lijst van regels 
stoppen bij 70. Regel 75 heeft een hoger 
nummer, dus die wordt niet gelist. 



Wil je alleen regel 50 op je scherm, dan 
geef je aan LIST maar één regelnummer 
mee, dus LIST 50. Bestaat die regel niet, 
dan komt er niets op je scherm. Wil je 
alleen de laatst ingetypte regel zien dan 
gebruik je de listopdracht met daarachter 
een punt, dus LIST. (RETURN). In dit geval 
zul je opnieuw regel 50 zien verschijnen. 
Geef je in LIST - 40 dan worden de regels 
vanaf het begin van het programma tot aan 
regel 40 gelist, terwijl LIST 60 - (RETURN) 
het programma vanaf regel 60 tot het 
einde, in ons geval regel 90, op je scherm 
schrijft. 

Je ziet dat er op deze manier ook selectief 
een serie regels uit een programma kan 
worden gelist. 

Wil je de listing eerder afbreken dan het 
regelnummer dat je hebt meegegeven, 
dan kan dat door op de RUN/STOP-toets 
te drukken. Het listen stopt onmiddelijk en 
het woord READY verschijnt op je scherm, 
samen met de cursor. 

Fouten opzoeken 

Al deze manieren om met LIST om te 
springen lijken op het eerste gezicht mis¬ 
schien wat overbodig, het tegendeel is 
echter waar. Want je bent per slot een 
programmeur, en het is niet ondenkbaar, 


dat je hier en daar een fout maakt bij het 
intypen van de Basic- commando’s. Die 
fouten moeten worden verbeterd, anders 
zal het programma nooit goed kunnen 
worden uitgevoerd. Om je fouten te verbe¬ 
teren, kun je natuurlijk de hele regel op¬ 
nieuw intypen, en dan zonder fouten. Maar 
dat is meestal nogal omslachtig en het 
risico zit erin, dat je ergens anders in zo’n 
regel een nieuwe fout maakt. Veel beter is 
het om de regel waarin je iets wilt verande¬ 
ren met LIST (regelnummer) op je scherm 
te halen en daarna met hulp van de cursor- 
toetsen en de toetsen INST en DEL de 
wijzigingen aan te brengen. Geef wel een 
RETURN nadat de regel klaar is, want 
anders wordt hij niet in het Commodore- 
geheugen gezet. Hieruit blijkt, dat door een 
regel met een reeds bestaand nummer 
opnieuw in te typen, de oude, reeds be¬ 
staande regel met datzelfde nummer uit 
het programma verdwijnt en vervangen 
wordt door de nieuwe regel met hetzelfde 
nummer. Wel iets om even te onthouden, 
want het heeft ook z’n nadelen, als je er te 
onoplettend mee omgaat. 

Om een bepaalde regel uit het programma 
te verwijderen, hoeft je daarom ook alleen 
maar het regelnummer te typen, en daar¬ 
achter meteen RETURN. De regel is dan 
echt verdwenen. Probeer het maar eens 
met regel 75. Geef je daarna weer een LIST 
opdracht, dan zie je dat het programma er 
weer net zo uit ziet als de listing van 
testprogramma 2/2. 


LIST 

LIST wordt gebruikt om een in de 
Commodore aanwezig Basic-pro- 
gramma op het scherm te kunnen af¬ 
drukken. Er bestaan diverse mogelijk¬ 
heden bij dit commando. 

LIST beginregel - eindregel 
De parameters voor zowel begin- als 
eindregel kunnen worden weggelaten 
waardoor respectievelijk van het be¬ 
gin tot de eindregel of vanaf de be¬ 
ginregel tot het einde van het pro¬ 
gramma de listing verschijnt. LIST 
zonder parameters list het gehele 
programma. De listing is te stoppen 
door op de RUN/STOP-toets te druk¬ 
ken. 


REM 

Als we het testprogramma beter bekijken 
zien we een commando dat we nog niet 
kennen. Dit staat in regel 10: 

10 REM TESTPROGRAMMA 2/2 
Waar het hier om gaat is het woord REM 
dat een afkorting is van het engelse RE- 
Mark of in het nederlands, opmerking. De 
funktie van dit commando wordt daar ei¬ 
genlijk al voldoende mee aangeduid, want 
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met REM kunnen we het nodige kommen- 

ta ar aan een programma toevoegen. 

Niet alle Basic-regels in een programma 
zijn vanzelfsprekend. Zeker niet, als ook 
anderen jouw listings moeten kunnen le¬ 
zen en begrijpen. Het is dan wenselijk,dat 
er hier en daar wat opmerkingen tussen 
staan, die in onvervalst nederlands vertel¬ 
len wat er op een bepaald punt in een 
programma aan de hand is. Zeker voor 
later is het gemakkelijk als je er tijdens het 
programmeren de nodige kanttekeningen 
bijzet, want over een paar maanden heb je 
al zoveel andere programma's gemaakt, 
dat je zeker bent vergeten wat een bepaald 
programma precies doet, dus is wat ver¬ 
duidelijking in het programma zeker op z’n 
plaats. 



Alle tekst op een programma-regel die 
volgt na een REM-commando wordt door 
de Commodore niet uitgevoerd. Ook al 
staat er een korrekte Basic tekst achter 
REM, het wordt tijdens het runnen volko¬ 
men genegeerd. 

Een echt programma 

Het is een goede gewoonte om ieder pro¬ 
gramma te beginnen met één of meer 
REM-regels, waarin je dan de titel van het 
programma kwijt kunt, de maker en de 
datum waarop je het hebt geschreven en 
tevens eventueel een korte uitleg van de 
funktie(s) van zo’n programma. 

Als voorbeeld de volgende Basic-listing: 

10 REM Celcius / Fahrenheit 
20 REM auteur: L.Snel, 30 jan. 1986 
30 REM 

40 REM dit programma rekent 
temperaturen om 
50 REM van graden Celsius naar 
Fahrenheit 
60 REM 

70 REM Gebruikte variabelen : 

80 LET CE = 0 :REM Celsius 
90 LET FH = 0 :REM Fahrenheit 


100 REM Begin programma 
110 PRINT CHR$(147) 

120 PRINT "Graden Celsius 
130 INPUT CE 

140 LET FH = (CE / 5) * 9 + 32 
150 PRINT 

160 PRINT CE; ” CELSIUS =”; FH; ” 
FAHRENHEIT” 

170 PRINT 
180 END 

Na het intypen en LIST moet je boven¬ 
staande listing op je scherm hebben. Je 
ziet dat we netjes regel 10 tot 70 als REM 
regels hebben gebruikt, terwijl achter de 
commando’s LET in regel 80 en 90 ook 
nog een REM te vinden is, gescheiden van 
de ’echte’ Basic door een Dat kan dus 
ook. 

Basic-variabelen 

We zien een paar onbekende Basicwoor- 
den in dit programma zitten. Laten we het 
echter eerst maar eens uitvoeren, voordat 
we met de analyse verder gaan. Typ RUN, 
en bovenaan een schoon beeldscherm 
verschijnt de vraag Graden Celsius ? met 
daarachter de cursor. Dit betekent dat de 
Commodore iets van ons wil weten. We 
typen daarom de temperatuur van van¬ 
daag in, zeg maar 5 graden. Je typt dus 
een 5, die je op het beeldscherm ziet 
verschijnen op de plek van de cursor. Druk 
daarna op RETURN en het programma 
gaat verder door twee regels naar onderen 
te schrijven: 

5 CELSIUS = 41 FAHRENHEIT 

Er verschijnt READY op het scherm, ten 
teken dat het programma is afgelopen. 
Run het programma nog maar een paar 
keer met wat andere temperatuuropga- 
ven, danzuljezien, dat er steeds nauwkeu¬ 
rig wordt berekend door de Commodore 
hoeveel graden Fahrenheit de ingetypte 
temperatuur in Celsius bedraagt. 

Nu het programma. 

In regel 70 vinden we de opmerking REM 
gebruikte variabelen: Regel 80 en 90 be¬ 
vatten de in dit programma gebruikte vari¬ 
abelen. Zonder deze variabelen zou dit 
programma niet kunnen worden gemaakt, 
dus ontkomen we niet aan wat meer uitleg 
over variabelen. In de toekomst zul je 
merken, dat het grootste deel van het 
programmeren uiteindelijk om de diverse 
variabelen blijkt te draaien, want die bevat¬ 
ten nu juist de 'variabele’ gegevens waar¬ 
mee alle programma’s werken. Variabelen 
zijn eigenlijk namen waarin bepaalde 
waarden kunnen worden onthouden. We 
kunnen b.v. de opdracht geven aan de 
Commodore PRINT 7 -2. 

We krijgen dan de oplossing op het 
scherm. Beter is echter om eerst de be¬ 


werking 7-2 onder te brengen in een varia¬ 
bele die we als naam bv. A geven. We 
moeten dan een extra regel toevoegen en 
dan ziet het geheel er zo uit: 

10 LET A = 7 - 2 
20 PRINT A 

Het resultaat op het scherm is hetzelfde als 
PRINT 7-2, maar nu hebben we niet direkt 
de uitkomst geprint, maar de waarde die 
op dat moment in de variabele met de 
naam A zit. In regel 10 hebben we A een 
waarde gegeven, en wel de waarde 5, wat 
'de uitkomst is van de berekening 7-2. Zo 
gaat het ook in ons temperatuur- program¬ 
ma. Daar gebruiken we twee variabelen 
met de namen CE en FH, die respectieve¬ 
lijk de waarde voor Celsius en Fahrenheit 
voor ons bewaren. Als beginwaarde krij¬ 
gen ze allebei de waarde 0 mee, door het 
commando LET CE=0, en LET FH = 0. 


REM 

REM wordt gebruikt om opmerkingen 
over het programma of anderszins in 
het programma te kunnen zetten. De 
gegevens na een REM-commando 
worden niet door de Commodore uit¬ 
gevoerd. REM kan ook worden ge¬ 
bruikt midden in een Basic regel, ge¬ 
scheiden door een van de voor¬ 
gaande opdrachten. Er zijn echter 
Commodore-versies bekend, waarbij 
het gebruik op deze manier in een 
DATA-regel problemen oplevert. De 
Commodore beschouwt dan ook de 
REM als normale DATA, Voorzichtig¬ 
heid is daar dus geboden. 


LET 

Het commando LET is een erfenis van de 
eerste Basic-dialecten, en is daarom in 
feite overbodig. Ik laat hem hier een keer 
zien, omdat hij toch bij de hele serie Basic- 
woorden hoort, maar we zullen het woord 
LET verder laten voor wat het is, want in de 
regels 80 en 90 had net zo goed kunnen 
staan CE=0 en FH=0. Dit heeft voor de 
Commodore eenzelfde effect, en spaart 
ons ruimte en typewerk. 

Interactie 

In regel 80 & 90 hebben we, met of zonder 
LET, de variabelen CE en FH in ons pro¬ 
gramma geintroduceerd. 

In regel 110 staat PRINT CHR$(147). Deze 
printopdracht geeft aan dat het scherm 
moet worden schoongemaakt. We kunnen 
dit ook doen door in te typen PRINT 
"SHIFT/CLR-HOME”. De cursor gaat daar¬ 
bij naar het begin, linksboven op het 
scherm. 

De bekende PRINT-opdracht uit regel 120 
wordt dan ook op die plaats uitgevoerd. 


23 





Daardoor staat nu op het scherm de vraag 
'Graden Celsius’ en de uitvoering van het 
programma bevindt zich bij regel 130. Let 
nog even op de toevoeging van een 
achter de tekst in regel 120. Dit betekent 
dat we met het printen niet op een nieuwe 
regel willen beginnen, maar direkt achter 
het woord 'Celsius' verder willen gaan. We 
zullen dit teken nog een paar keer in het 
programma tegenkomen. 


LET 

Het LET commando wordt gebruikt 
om een waarde aan een Basic varia¬ 
bele toe te kennen. Het is een optio¬ 
neel commando, wat betekent dat 
het net zo goed kan worden wegge¬ 
laten, zonder dat de werking van de 
Basic interpreter hierdoor wordt ver¬ 
stoord. De funktie : AA = 25 * 12 is 
dus identiek aan LET AA = 25 * 12 


INPUT 

Regel 130 is de kern van dit programma. 
Daar wordt namelijk door het INPUT-cqm- 
mando een waarde van het toetsenbord 
ingelezen. Deze waarde wordt ingevoerd 
door de gebruiker, en door de Commodo¬ 
re, in regel 130 toegekend aan de variabele 
CE. Dit is de eenvoudigste manier om 
Basic-programma’s interactief te maken 
met de gebruiker. Het programma vraagt 
de gebruiker een waarde in te toetsen, die 
de temperatuur in Celsius aangeeft. Maar 
daar weet de Commodore weinig van na¬ 
tuurlijk. Het enige wat hij doet is het opber¬ 
gen van de ingetypte waarde in de variabe¬ 
le met de naam CE. Variabelen kun je het 
beste vergelijken met een grote serie klei¬ 
ne laatjes met ieder een eigen naam. Doe 
je zo’n laatje open, dan vind je daar de 
waarde van de variabele. Wil je een andere 
inhoud in het laatje stoppen, dan geef je 
simpel weer een commando in de vorm 
(LET) B = 10. De oude inhoud van laatje B 
wordt daarmee vergeten, en vanaf nu zit 
de waarde 10 in het laatje van de variabele 
B. 

Zo ook in regel 130. De gebruiker typt hier 
een 5, het was immers 5 graden Celsius, en 
deze '5' wordt als waarde opgeborgen in 
de la met de naam CE. 

In regel 140 wordt dan driftig gerekend 
met de formule die we allemaal op school 
hebben geleerd om deze twee graadme¬ 
ters met elkaarte kunnen vergelijken. Deze 
formule was zoiets als C=5/9 x F + 32. Als 
je even rekent en de 'formule' van regel 
140 beter bekijkt, dan zul je zien, dat er 
feitelijk weinig verschil zit tussen de na- 
tuurkunde-formule en de computer-bere- 
kening. Wat er gebeurt, is dat de waarde 
van de variabele CE wordt ingevuld voor 
de CE in regel 140, dan wordt de bereke¬ 


ning gemaakt en de uitkomst wordt in de la 
van variabele FH gestopt. Maar het leuke 
is, dat ook de variabele CE nog de waarde 
5 heeft. Er is voor de berekening als het 
ware alleen maar even in het laatje CE 
gekeken wat er in zat, zonder de inhoud te 
verwijderen. We kunnen nog eindeloos 



verder met CE. Variabele FH had waarde 0, 
die we toegekend hebben in regel 90, maar 
krijgt nu de waarde 41 voor graden Fahren- 
heit. 

Dat dit allemaal juist is kunnen we kohtro- 
leren door regel 160. Het printkommando 
bestaat hier feitelijk uit 4 verschillende 
opdrachten. De eerste is het printen van de 
waarde van CE (was 5) daarna komt een 
die betekent dat we op dezelfde regel ook 
de rest moeten printen, dan krijgen we de 
tekst ” CELSIUS = ”, die wordt letterlijk 
geprint, daarna komt de waarde van FH 
(dus 41) op het scherm, met daarachter de 
tekst ” FAHRENHEIT". Het hele program¬ 
ma is hiermee uitgevoerd, behalve de laat¬ 
ste regel, 180 END. In feite spreekt dit 
commando voor zichzelf, het geeft aan dat 
het Basic programma met deze regel is 
afgelopen. De Commodore hoeft niet ver¬ 
der te zoeken, of er nog meer regels zijn, 
want ook al waren die er, dan nog wordt 
met END de verwerking afgebroken. 


INPUT 

Het INPUT-commando is hier nog 
maar kort aan de orde geweest. Het 
dient om interactie teweeg te bren¬ 
gen tussen Basic- programma en ge¬ 
bruiker. Met INPUT kunnen gegevens 
door de gebruiker (via het toetsen¬ 
bord) aan de Commodore worden 
toegevoerd. Het INPUT commando 
zorgt dat deze waarden worden toe¬ 
gekend aan de variabele die daarvoor 
door de programmeur is aange¬ 
wezen. 


END 

Het gebruik van END om aan te geven dat 
het programma hier moet worden gestopt, 
is niet direkt nodig, want als er geen regels 
meer zijn, dan valt er voor de Commodore 
weinig meer te verwerken, dus wordt er 
vanzelf gestopt en komt de computer te¬ 
rug met READY. Wel kan ik END voor 
iedereen die een betere struktuur in z’n 
programma’s wil brengen aanbevelen, 
want iedereen die later een listing van zo’n 
programma bekijkt, kan dan in een oog¬ 
wenk zien waar het programma begint en 
ophoudt. Overigens mag je de opdracht 
END zoveel en zovaak in je programma 
zetten als je wilt. De Commodore stopt 
echter meteen bij het tegenkomen van een 
END. 


END 

END wordt gebruikt om de computer 
te laten weten, dat het programma 
hier op een goede manier moet wor¬ 
den gestopt. Er kunnen zoveel END- 
commando’s in een programma wor¬ 
den gebruikt als wenselijk is. Het ge¬ 
bruik van END komt de program- 
meerstruktuur ten goede, maar is (net 
als LET) in de meeste gevallen optio¬ 
neel. 


PRINT ; 

Door een ; achter een PRINT op¬ 
dracht te plaatsen geven we te ken¬ 
nen, dat de volgende te printen ka¬ 
rakters NIET op een niewe regel, 
maar direkt achter de voorgaande 
tekst moet worden gezet. Dit geldt 
voor zowel alle PRINT-achtige op¬ 
drachten als de opdrachten die be¬ 
stemd zijn voor de printer. Een soort¬ 
gelijk gebruik is toegekend aan de , 
(komma) tussen PRINT-commando’s. 


En verder... 

Na al deze toch vrij pittige commando’s 
hoop ik dat je er zoveel van hebt opgesto¬ 
ken, dat je zelf met de eerste beginselen 
aan de slag kunt. Vragen en opmerkingen 
over de Commodore-basic kun je richten 
aan de redaktie van Commodore-lnfo, 
t.a.v. Jan Bodzinga, Postbus 112,1260 AC 
Blaricum. Als je reaktie of vraag van belang 
kan zijn voor meerdere Commodore-le- 
zers zullen we er de nodige aandacht in 
Cömmodore-info aan besteden. Voor nu, 
veel programmeerplezier en tot deel 3. 

Jan Bodzinga. 
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o Basic Min 

Een rubriek van Nico Baaijens me 


Een grote buit aan inzendingen ligt weer op mijn bureau met rechts naast mij de C64 
om dat spul allemaal te testen. Er zit weer veel goeds bij. Om deze twee pagina’s zo 
goed mogelijk te vullen, geef ik zoveel mogelijk listings en zo weinig mogelijk 
commentaar. Het blijkt, dat we niet altijd alles hebben kunnen plaatsen, dus er is nog 
wat reserve. Dit om inzenders, die hun mini’tje nog niet terugzagen, gerust te stellen. 


Leuke game 

Van Tonny en Peter Nuyens uit Merksem, België, een knappe 
game. Ontwijk de balletjes door op tijd op de spatiebalk te 
drukken. 

5 SC=0: Y=40 

10 PRINT”<SHIFT/CLR HOME>”: Y=Y-10 

20 FORL=1TO20 

30 X= I NT(980* RN D(1))+10 

40 POKE 1024+X.81: NEXT 

50 FORL=1TO1000 

55 SC=SC+1 

56 FORE=1TOY: NEXT 

60 GETA$: IF A$=” ’THEN L=L+4: NEXT 
70 IF PEEK(1024+L)=81THEN PRINT”<SHIFT/CLR HOME> 
SCORE: ”;SC: END 
80 POKE 1024+L.160: NEXT 
90 GOTO 10 

Snelle VIC 20 

Voor VIC20-ers een demo Basic versus machinetaal van Richard 
van de Ven uit Tegelen. Run eerst dit stukje Basic: 

10 POKE 36879,8: POKE 36879,25: GOTO 10 

Stop de machine, toets nu dit stukje machinetaal in en zie het 
grote verschil: 

10 DATA 169,8,141,15,144,169,25,141,15,144,76,16,28 
20 FORI=1T013: READA: POKE 7184+1-1,A: NEXT 
30 SYS 7184 

Vallende letters 

Stephan Zwanikken uit Hattem werd geïnspireerd door de tekst- 
miniatuurtjes van enkele maanden geleden. 

10 P=0: 1=0: PRINT”<SHIFT/CLR HOME>”: F0RI=1T023: 

READA: FORP=1 T0460STEP40: POKE 1024+P+I.A 
20 IF P<420THEN POKE 1024+P+I.32 
30 NEXTP: NEXTI: WAIT653.1 

40 DATA3,15,13,13,15,4,15,18,5,45,9,14,6,15,61,20,8,5,32, 
2,5,19,20 

Bugs in Basic 

Volgens mij en velen met mij wemelt het van de bugs (fouten) in de 
Basic-interpreter van de C64. Een leuke methode om dat te testen 


geeft G. Bungener uit Venlo. Tik de volgende SYS in. Druk daarna 
op RUN/STOP en RESTORE en blijf de SYS intypen tot de C64 
erbij neervalt. 

SYS 42200 

Strange effect 

Van die bugs kan zelfs worden geprofiteerd voor het verkrijgen 
van rare effecten. Onderstaand miniatuurtje is van Alfons Uytde- 
haag uit Nispen. 

10 FORX=0TO255: POKE 53280,X: POKE 53281 ,X 
20 POKE 53272,X: POKE 646,X: PRINT: NEXT: RUN 

Typecursus 

Leer nou eindelijk eens goed typen, wil Marco Dijkman uit Den 
Haag zeggen met zijn heel aardige type-cursusje in miniatuurfor¬ 
maat. 

5 PRINT”<SHIFT/CLR HOME> TYPECURSUS” 

10 FO=0 

20 READA$: IF A$=”1”THEN PRINT’U HEEFT ”;FO;”FOUTEN 
GEMAAKT”: END 
30 GETB$: IF B$=””THEN 30 
40 IF B$=A$THEN PRINT’GOED”: GOTO20 
50 IF BIOASTHEN PRINTTOUT”: FO=FO+1: GOTO30 
100 DATAA,B,C,D,E,F,G,H,l,J,K,L,M,N,0,P, Q,R,S,T,U,V,W,X,Y,Z,1 

Staafdiagram 

Van Eelco Muller uit Geldrop een miniatuurtje om staafdiagram¬ 
men te maken. 

5 PRINT”<SHIFT/CLR HOME>”POKE 53281,0 
10 PRINTTAB(25)”GETAL”;: INPUTA 
15 X=X+1: IF X=10RX=17THEN X=X+1 
20 IF X=25THEN GOTO20 
25 IF A>24THEN A=24 
30 FORT=1TOA: POKE 1984+X-k40,160 
: POKE 56256+X-k40,X: 1 = 1 + 1: NEXT: 1=0 
40 GOTOIO 


Een klein maar fijn miniatuurtje van Gertjan Franke uit Haarlem: 
0 PRINT”<SHIFT/CLR HOME>”: POKE 53280,0: POKE 53281 0 

1 FORA= 1TOI 00STEP0.02 

2 POKE 1483,A: NEXTA 

3 GOTO 0 
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Latuurtjes ooT) 

corte tot zeer korte programma’s. 


STER-djingle 

De STER-pingels blijven ook binnenkomen. Ik heb er weer drie 
liggen, maar er is slechts ruimte voor één. Het lot koos Andre 
Rozendal uit Loenen. 

105 FORA=1TO750: NEXT 
110 POKE 54296,15 
120 POKE 54277,9 
130 POKE 54276,17 
135 FORA=1TO20: NEXT 
140 FORT=1TOD: NEXT 
150 READA: READB: READD 
170 IF A=-1THEN RUN 
180 POKE 54273,A 
185 POKE 54272,B 
190 POKE 54276,32 
200 GOTO 120 
205 REM DEEL 1: 

210 DATA63,75,100,59,190,150,63,75,100,50,60, 

150,37,162,100,37,162,150,37 
220 DATA 162,120,42,62,140,50,60,115,56,99, 

150,63,75,550 
225 REM DEEL 2: 

230 DATA29,223,100,31,165,100,33,135,100,37, 

162,200,29,223,100,25,30,200 
240 DATA22,96,100,29,223,350,33,135,450,29, 

223,450,-1,-1,-1 


Joystick 

Met de joystick kunnen tegenwoordig ook geluiden worden 
voortgebracht. Van Erik Moddejonge uit Borne dit miniatuurtje: 

10 PRINTCHR$(147) 

20 FORI=54272T054296: POKE 1,0: NEXT 

30 POKE 54296,15: POKE 54277,128: POKE 54278,128 

40 P=PEEK(56320) 

50 IF P=126THEN R=R+10 

60 IF P=125THEN R=R-10 

70 IF R<0THEN R=0 

80 IF R>3990THEN R=3990 

90 POKE 53280,R/256: POKE 53281 ,R/256 

100 F=R/.06097: HI=INT(F/256): LO=F-(256*HI) 

110 POKE 54273,Hl: POKE 54272,LO: POKE 54270,33 
120 GOTO40 


In elke Miniatuurtjes-rubriek hoort ten minste één programmaatje 
voor de Cl 6, vindt Alfons Bosma uit Oost-Souburg. Dat vind ik 
ook. Hieronder de C16-bijdrage van Alfons: 

C-15 

1 COLOUR4,8: COLOUR1,8: COLOURO.1: GRAPHIC 3,1: FORA 
= 100TO50STEP-1: CIRCLE,75,100,A: NEXTA 

2 COLOUR1,4: FORX=50TO1 STEP-1: CIRCLE,75,100,X: NEXTX 


Simons Basic 

Tot besluit een aantal miniaturen in het zeer populaire Simons 
Basic. 

Van Martijn Dessing uit Gouda een lasershow: 

2 HIRES 1,0: COLOURO,1 

4 A = I NT(320* R N D(2)): B=INT(200*RND(2)) 

5 LINE 2,100,A,B,1: LINE 2,100,A,B,0 

6 GETA$: IF A$=””THEN 4 

7 END 

Van J. van den Heuvel uit Amstenrade: 

100 COLOUR 0,0: HIRES 7,0: MULTI 0,7,10 
110 X=2: TEXT 0,0,”EVEN WACHTEN”,3,1,6 
120 ARC 80,100,1,180,10,5+X,5+X,1 
130 ARC 80,100,1,180,10,6+X,6+X,1 
140 X=X+4 

150 ARC 80,96,181,360,10,5+X,5+X,1 
160 ARC 80,96,181,360,10,6+X,6+X,1 
170X=X+4 

180 IF X>=70 GOTO 200 

190 GOTO 120 

200 BLOCK 0,0,80,10,0 

210 LINE 80,22,80,30,1: PAINT 80,100,2 



Van Erik Jan Bultje uit Spijkenisse: 

10 HIRES 0,1 

20 FOR X=0 TO 100 STEP 20 
30 FOR Y=0 TO 100 STEP 20 
40 CIRCLE 160,100,X,Y,1 
50 NEXT Y: NEXT X 
60 GOTO 60 

70 REM PROBEER IN REGELS 20 EN 30 OOK: STEP 10! 
en: 

10 HIRES 0,1 

20 FOR X=0 TO 100 STEP 10 
30 REC X,X,X,X,1 
40 NEXT X 
50 GOTO 50 

Tot zover weer de Basic Miniatuurtjes. Er zijn nog wat inzendingen 
overgebleven, die zo mogelijk de volgende keer voorrang krijgen. 
Veel programmeerplezier. • 
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Behalve voor astrologische voorspellingen kun je de computer ook toekomstprogno- 
ses laten maken, voorspellingen laten doen over wat er gaat gebeuren. Hoeveel auto’s 
zijn er in 1990 en hoe ziet het verkeer er in het jaar 2001 uit? Of hoe besteden wij onze 
vakanties in 1999? De computer kan voor de beantwoording van deze vragen 
modellen gebruiken, die de werkelijkheid simuleren, waardoor planalogen, economen 
en politici dan tijdig kunnen inspelen op mogelijke ontwikkelingen. 


TOEKOMST- 

SDVrULATIE 

Onze toekomst in 
digitale handen? 


O nlangs overleed Prof. Fred Po¬ 
lak, de vader van de "Futurolo¬ 
gie” en een groot denker en 
schrijver over de rol van de "Au¬ 
tomatte" in onze samenleving. 
Met hem mag evenwel de aandacht 
voor de toekomst, de rol die de voor¬ 
spellingen daarin hebben en de wissel¬ 
werking tussen voorspelling en toe¬ 
komst, "De toekomst is verleden tijd” 
niet verslappen. 

Fred Polak was een kritisch (en soms lastig 
gevonden) visionair, die het verschijnsel 
der Automatie en de invloed daarvan op 
onze toekomst in vele, vele boeken aan de 
orde stelde. Zijn ideeën over de "Nieuwe 
wereld der automatie” en over de manier, 
waarop denken over de toekomst die toe¬ 
komst weer beïnvloedde, waren niet on¬ 
omstreden, maar hebben wel degelijk de 
discussie over de sociale gevolgen van de 
automatisering op gang gebracht. Polak 
heeft gewaarschuwd voor de ongewenste 
effecten van meer machines, meer compu¬ 
ters, meer macht in handen van onper¬ 
soonlijke apparaten en een aantasting van 
de eigen vrijheid; ”de machine heeft gege¬ 
ven, de machine heeft genomen”. Hij voor¬ 
spelde de overgang van een tijdperk van 
knoppendrukkers naar het tijdperk van 
zichzelf drukkende knoppen. 



Fred Polak, vader van de Nederlandse futuro¬ 
logie 


Fred Polak schreef niet alleen zelf enorm 
veel, hij was ook stimulator voor andere, 
veel jongere schrijvers op het gebied der 
computerkunde, waaronder enige leden 
van de redactie van dit blad. Reden waar¬ 
om we verder in dit artikel ingaan op wat 
ontwikkelingen op het gebied van de toe- 
komstsimulatie. 


Modelsimulatie en expertise 

Iedereen kent wel de CAD-plaatjes uit de 
auto- of vliegtuigindustrie. Met behulp van 
Computer Aided Design is het mogelijk om 
complete industriële ontwerpen in al hun 
technische details op het beeldscherm te 
zetten. Daarbij kan bovendien in allerlei 



Het Nederlandse CAD-pakket ARCOS 


simulaties, bijvoorbeeld de terugkeer van 
de space shuttle in de dampkring, de 
deugdelijkheid en/of efficiëntie van het 
ontwerp beproefd worden. Een dergelijke 
modelsimulatie bespaart de industrie veel 
geld daar de "kneusjes” en fouten zonder 
de harde leerschool van de echte proef¬ 
modellen al door de mand vallen. 

Ook voor medische- en financiële experti¬ 
se gebruikt men steeds vaker simulaties 
om alle bijkomstige factoren te kunnen 
overzien. Ondanks de uitgebreidheid van 
deze expertisesystemen zijn hun capaci¬ 
teiten beperkt. Een menselijke expert had 
hetzelfde probleem dikwijls ook in enkele 
uren kunnen oplossen. De reden dat ex- 
pertise-software toch opgang maakt zit 
hem in het feit dat experts relatief zeld¬ 
zaam en duur zijn en soms een steekje 
laten vallen. Een computer maakt zelden 
fouten en is ook niet bevooroordeeld. 

Toekomstprognose 

Op grond van de verdiensten op het ge¬ 
bied van CAD en expertise is de computer 
een potentiële kandidaat voor het ontwer¬ 
pen van zinnige toekomstprognoses al 
dan niet voorzien van grafische modellen. 
In het woord ontwerpen schuilt echter een 
addertje onder het gras. Voor een 100% 
betrouwbare toekomstprognose dient het 
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main frame een zodanige grote hoeveel¬ 
heid aan gegevens en toevalsfactoren te 
verwerken dat zelfs een Cray 2-rekenmon- 
ster daar vele jaren mee bezig zal zijn. 
Bovendien moet je zo’n prognose bij een 
plotselinge kentering weer helemaal op 
nieuw starten. Al met al een ondoenlijke en 
geldverslindende procedure. 

Voor een toekomsprognose heeft men dus 
uit practische overwegingen een andere 
simulatie vorm nodig dan voor het uitwer¬ 
ken van natuurkundige, financiële of ge¬ 
zondheidsproblemen. Zodra je niet meer 
met een uitsluitend wiskundig te beschrij¬ 
ven structuur, het structuur-concept, te 
maken hebt zul je met een verhaalvorm of 
scenario moeten gaan werken 

Het computerscenario 

Een scenario heeft per definitie een ver¬ 
haal, een logische ontwikkeling als grond¬ 
slag. Net als bij de film draait men er niet 
gewoon wat op los maar gaat men volgens 
een of meerdere rode draden te werk. De 
voordelen zijn een aanzienlijke tijdsbespa¬ 
ring en de mogelijkheid om alternatieve 
toekomstmodellen te bekijken. Als nadeel 
geldt dat de betrouwbaarheid van de prog¬ 
nose door het gebruik van een scenario 
afneemt. 

Hoe werkt nu zo’n scenario? Bij een sce- 
nario-opzet laten de vragenstellers bewust 
een aantal factoren buiten beschouwing. 
Stel een reisorganisatie wil weten hoeveel 
beddencapaciteit zij op grond van de zich 
herstellende economie en de groeiende 
populariteit van Griekenland in 1987 moet 
reserveren. Daarbij is de vraagstelster 
vooralsnog niet geinteresseerd in een plot¬ 
selinge economische teruggang of het uit¬ 
breken van een Grieks-Turkse oorlog. Zij 
wil weten of het redelijkerwijs verstandig is 
meer (hotel-)accomodatie in te kopen of 
niet. Eventueel kun je als een soort preven¬ 
tie laten berekenen op hoeveel bedden je 
een, zo nodig later te annuleren, optie kunt 
nemen. Een dergelijke optie laat zich dan 
naar aanleiding van de boekingsresultaten 
over 1986 nog corrigeren. 

Het bovenstaande voorbeeld is vrij simpel, 
maar biedt toch vele aanknopingspunten. 
Zo kan de reisorganisatie bijvoorbeeld een 
optimistische- en een pessimistische ver¬ 
sie laten uitwerken. Daaruit kan de mogelij¬ 
ke schadepost bij de miscalutatie van het 
optimistische scenario berekend worden. 

Doorrekenen doolhof 

Een echt scenarioprogramma moet, uit¬ 
gaande van een aantal van tevoren vastge¬ 
legde verbanden en startpunten, proberen 
nieuwe verbanden te ontdekken en deze in 
de toekomst door te berekenen. De inge¬ 
voerde causale factoren zijn te zien als de 
muren van een doolhof. Eenmaal in het 
doolhof heeft de dolende totaal geen uit¬ 


zicht over de doolhofstructuur. Van bove¬ 
naf gezien, in vogelperspectief, is de weg 
naar de uitgang gemakkelijk te herkennen. 
Zo ook bij het scenarioprogramma dat als 
het ware alle meespelende factoren vanuit 
de "lucht” bekijkt, verbanden legt en ver¬ 
volgens mathematisch verwerkt. Figuurlij- 
kerwijs kun je daarbij van "vogelperspec- 
tiefanalyse” (VPA) spreken. 

De vooraf als vastliggend ingevoerde data 
noemt men ook wel kennisgrootheden. 
Een kennisgrootheid kan bijvoorbeeld de 
procentuele daling van de werkloosheid 
(quantitatief) of de invloed van het kabi¬ 
netsbeleid op de publieke opinie (qualita- 
tief) zijn. Alle causale factoren, kennis¬ 
grootheden en gelegde verbanden wor¬ 
den door de computer in een rekenmatrix 
ondergebracht. Aan de hand van het ma- 
trixmodel kan de computer kleinere ver¬ 
banden in grotere omrekenen en aan de 
verschillende factoren een waardeoordeel 
toekennen. In ons reisorganisatievoor- 
beeld kan de zongarantie en de sfeer ih 
Griekenland belangrijkerzijn dan de nega¬ 
tieve invloed van de elk jaar opnieuw stij¬ 
gende prijzen. 

Op grond van de berekende waarschijn¬ 
lijkheden kan het scenarioprogramma ver¬ 
gaande uitspraken doen en deze met sta¬ 
tistische feiten staven. Niettemin blijven er 
altijd verrassingen mogelijk. Goede scena¬ 
rio’s beschikken daartoe over de optie om 
verstorende factoren of oorzaken in te 
bouwen. De gevolgen van aardbevingen, 
economische veranderingen of een wijzi¬ 
ging van de publieke opinie kunnen tot 
volledig tegenovergestelde conclusies lei¬ 


den. De computer is het om het even en 
berekent alles rustig door. 

Het nut van 
toekomstsimulatie 

Het simuleren van toekomstmodellen is 
van belang voor planologen, politici, eco¬ 
nomen en bedrijven. De behoefte aan me¬ 
dische zorg, recreatievoorzieningen, 
woonruimte, gebruiksvoorwerpen en luxe 
artikelen laten berekenen maakt tijdig op 
de vraag inspelen mogelijk. Nog belang- 
rijker is het vooraf inschatten van de gevol¬ 
gen van eventuele rampen (ontploffing van 
een kerncentrale of het smelten der pool¬ 
kappen) of grootscheepse projecten als 
het inpolderen van de Waddenzee. 

De verkregen waarden zijn natuurlijk net zo 
betrouwbaar als de aannamen en dus ze¬ 
ker geen 100%. De weersvoorspelling bij¬ 
voorbeeld laat het ondanks de geavan¬ 
ceerde apparatuur maar al te vaak afwe¬ 
ten. (Dat geldt overigens ook voor beken¬ 
de weerprofeten) en het is nog niemand 
gelukt de voetbalpool drie maal achtereen 
te winnen! 

De computer kan (nog) niet menselijk den¬ 
ken of abstracte begrippen verwerken. 
Toch gaat hem het toekomst voorspellen/ 
simuleren redelijk af. Wij zullen de verkre¬ 
gen uitspraken echter altijd tegen de ach¬ 
tergrond van het gebruikte scenario moe¬ 
ten bezien en ook ons gezonde verstand 
moeten gebruiken om te zien of bepaalde 
randvoorwaarden op ethisch niveau niet 
overschreden worden. Ethiek en compu- 
terkunde liggen voorlopig nog niet op het¬ 
zelfde spoor. • 


MARVELD COMPUTERFRAMES 


maken van uw 
losse apparatuur een 
compleet systeem AlH-ial 

MtiV0 n \ a a 

VOORDELEN: 1 

• ruimtebesparend «■- 

• monitor/t.v. op werkbare hoogte 

• kabels uit het zicht 

• professioneel uiterlijk 


Gemaakt van hoogwaardig 
gepuntlast plaatstaal, 
gespoten in de kleur beige. 

Zeer stevig geheel, dus ook 
geschikt voor de zwaardere 
kteurenmonitor/t. v. 

Geschikt voor: 

Commodore 64 - C 16 - VIC 20 ■ 
alle MSX-machines (type C) 



Voor computer, monitor/t.v., 2 diskdrive’s of Cass. 
recorder en diskdrive. 

INFORMATIE: 

MARVELD COMPUTING MALDEN 

telefoon 080-583522 


Dealerlijst op aanvraag. 
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Print-out 


Met o.a. Heenenweer 64 - Rekenpen - 
3D tekst - Lettertekenaar - Bioritme 


Met ingang van het eerste nummer van de derde jaargang is de 
listingrubriek ingedeeld in drie afdelingen. Allereerst vindt U een 
aantal Utilities voor de C64 bij elkaar en daarna de gewone C64 
listings. Het laatste gedeelte komt tegemoet aan de groeiende 
belangstelling voor de Cl 6. Alleen vorige maand al ontvingen 
we meer inzendingen voor deze computer dan in het hele 
afgelopen jaar. En zo hoort het ook, want u begrijpt natuurlijk wel 
dat zonder inzendingen deze rubriek geen lang leven beschoren 
is. Dus Cl6 en Plus4 bezitters ik hoop dat jullie behalve het 
overnemen van listings ook zelf programma’s blijven (of gaan) 
maken en naar ons opsturen. 

We krijgen nog regelmatig programma’s aangeleverd die niet op 
een cassette of diskette staan. Tot onze spijt moeten we listings 
die alleen op papier staan weigeren. Probeer te begrijpen dat 
het ondoenlijk is om deze over te gaan tikken. 

Behalve de nieuwe Cl 6/Plus4 rubriek is er nog iets nieuws. Voor 
mensen die vragen over, of problemen met de door ons 
geplaatste listings hebben, staat er vanaf nu een telefoonnum¬ 
mer open. Elke maandag, feestdagen uitgezonderd, kunt u van 
16.00 uur ’s middags tot 21.00 uur ’s avonds met ons bellen 
onder het nummer 02152-63431. Deze extra service houdt wel 
in dat u op andere tijden er geen informatie over de liustings 
meer gegeven kan worden. 

Rob van den Heuvel. 


Checksum-listtester 64 


Nog maar eens het Syntax-checksum programma om uw 
intikwerk te controleren. Intikken, saven, en dan via RUN onderin 
in het geheugen plaatsen, dan te testen programma laden (niet 
runnen) en via SYS 49152 testen. 

Dit is de versie, waarbij met Run/stop de listing op het scherm 
kan worden gestopt en met F-1 of F-7 weer kan worden 
doorgegaan. Op papier printen gaat met : OPEN 4,4: CMD 4: 
SYS 49152 en dan na het printen weer PRINT #4: CLOSE 4 om 
het af te sluiten. Niet alle fouten haalt u hiermee uit uw 
programma’s, want omwisselingen zoals uv ipv. vu komen er 
niet uit, maar vooral dataregels kunt u er heel goed mee 
controleren. 


1 rem X X * X X * * X * X X * * ***** * x * * * * * * * * X * x * * * * * * * * * * 
* * * * * * * * * * * * * * * * * * 

2'rem basic loader "SYNTAX.CHECKS 

UM" 

3 rem runnen en new. blijft in ram op JcOOO. 

4 rem cbecksum testen met commando : 

sys 49152' 

5 rem 

6 rem v.840928.64 jan bodzinga 

7 rem ********************************** ******* 
****************** 

10 1=49152 :rem beginadres 

20 reada:ifa<0thenËO :rem data ingelezen 

30 pokei,a:i=i+lVgoto20 

50 poke49184,148:poke49185,192 


Inhoud van dit listingdeel 


Checksum 

30 

Figuren 64 

51 

Chipkontakt64 

34 

Kubus64 

52 

Vlaggen 

35 

Rekenpen 

53 

Heenenweer 64 

37 

Wandelgang 

54 

3D tekst 

37 

Lettertekenaar 

55 

VU Meter 

38 

Op tel en sprong 

56 

Logoboom 

38 

Bioritme 

57 


55 i=49300 


60 

read 

o: i 

fa< 01 

Shen90 






70 

poke 

3,0:5 

= i + 1: 

: got o60 





90 

pri n 

t"dat 

a is 

weggezet" 





95 

prin' 

t"checksum t©st< 

en me 

: t sys49152 

II 


100 

data 

165, 

43, 

166, 

44, 

133, 

163, 

134, 

164, 


169, 

147 








110 

data 

32, 

210, 

255, 

160, 

0, 

240, 

3, 

32, 


73, 

192 








120 

data 

32, 

73, 

192, 

208, 

1, 

96, 

32, 

225, 


255, 

208 








130 

data 

3, 

76, 

116, 

164, 

32, 

81, 

192, 

32, 


73, 

192 








14 0 

data 

240, 

12, 

201, 

32, 

240, 

247, 

24, 

101, 


167, 

133 








150 

data 

167, 

76, 

37, 

192, 

166, 

167, 

169, 

0, 


132, 

168 








160 

data 

32, 

205, 

189, 

169, 

13, 

32, 

210, 

255, 


164 , 

168 








170 

data 

76, 

17, 

192, 

200, 

208, 

2, 

230, 

164, 


177, 

163 








180 

data 

96, 

162, 

0, 

189, 

123, 

192, 

240, 

6, 


32, 

210 








190 

data 

255, 

232, 

208, 

245, 

32, 

73, 

192, 

170, 


32, 

73 








200 

datal 

.92, 

132, 

168, 

32, i 

205, 

189, : 

162, 

3, 


69, 

32 








210 

data 

32, 

,210, 

255, 

202, 

208, 

250, 

169, 

0, 


133, 

167 ’ 








220 

data 

164 , 

168, 

96, 

82, 

69, 

71, 

69, 

76, 


32, 

0 








230 

data 

-1 








240 

data 

165, 

197,2 

01,3,240,7 

,201, 

4,240, 

6 



250 -data 76,148,192,76,34,192,169,147,32,210 
260 data 255,76,161,192 
270 data -1 

*** EINDE LISTING *** 

Cbecksum: Checksum.nw 


regel 

1 

249 

rege] 

110 

158 

regel 

2 

84 

rege] 

120 

232 

regel 

3 

6 

rege 1 

130 

183 

regel 

4 

117 

rege 1 

14 0 

96 

regel 

5 

143 

rege 1 

150 

96 

regel 

6 

17 

regel 

160 

127 

regel 

7 

61 

regel 

170 

71 

regel 

10 

157 

regel 

180 

223 

rege 1 

20 

65 

rege] 

190 

73 

rege ] 

30 

203 

rege 1 

20 0 

79 

regel 

50 

14 

rege 1 

210 

109 

rege 1 

55 

251 

rege ] 

220 

106 

rege 1 

60 

193 

rege 1 

230 

225 

regel 

70 

207 

regel 

240 

114 

rege 1 

90 

245 

rege] 

250 

89 

regel 

95 

237 

rege] 

260 

68 

rege 1 

100 

183 

rege ] 

270 

225 












PRINT-OUT- PRINT-OUT- PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT - PRINT-OUT- PRINT-OUT 


UTILITIES 1 


Geluiden 


Het volgende programma bevat een aantal geluiden. Na het 
programma te hebben geRUNd, hoort u achtereenvolgens een 
vibrato, een sirene, een muskiet, een klok en geklap. Deze 
geluiden kunnen van pas komen als u zelf een spel heeft 
gemaakt en dit d.m.v. geluid wilt verfraaien. Speelt u gerust ook 
eens met de diverse waarden die gePOKED worden, hierdoor 
veranderen de geluidseffecten. 


1 rem geluiden / cbm-64 

2 rem door p verheijde 

3 rem uit dordrecht 

4 rem 

100 gosub1000iprint"CRVS-aan3 vibrato 

II 

110 pokes+3,8spokeB+5,4l8pokes+6,89spoke 
s + 1 4,117ipokes+18,16ipakes+24,143 
120 read-fr,dri if f r»0then-f or i«0to999i neut 
igoto200 

130 pak«e+4,6Sifart»ltDdr*2ifq-fr+peek 
(s+27)/2 

140 hX«-f q/2568 1 -f-f qand255 
150 poke», lf ■ pokea+1 , h7.i next 
160 pokes+4,648gotol20 

190 data4B17,2,5103,2,5407,2,B583,4,5 
407,2,8583,4,5407,4,8583, 12,9634, 

2 

191 datal 0207,2, 10814,2,B5B3,2,9634,4 
, 10814,2,B583,2,9634,4,8583, 12,0, 

0 

200 gosub1000 j print"CRVS-aan] sirene " 

210 pokea+14,5ipokes+18,16spakes+3,ll 
pokes + 24, 143ipokes+6,240 8 pokes+4, 

65 

220 -f r = 5389s-f ort~lto200 
230 fq B fr+peek(s + 27!13.5 
240 hX--fq/256» 1-f *=-f q-h 7. * 256 
250 pokes, lf ! pokes+1, h7.i next 
260 -f or 1 =0to999 s nex 18 pokes + 24, @ 

300 gosub 1000: pr i nt " C RVS-aan 3 geklap 11 
310 pokes, 2408 pokes+1,33ipokes+5, 8spoke 
s + 22, 104 8 pokes + 23, 18pokes + 24,79 
320 forn»ltol5ipokes+4,129sfort“lto25 
0ineKt8poke*+4,12B8fort-lto308next 
8 nex t 

330 -f or i “0t o999 i nex 1 1 p ok es + 24,0 

400 gosub10008print"CRVS-aan3 muskiet 

410 pokes+1,1001pokes+5,219ipokes+15, 

28ipokBB+24,15 
415 for q“ 1 1 o3 s pok es + 4 , 19 
420 fort“lto5000inekt 8pokes + 4,18 
430 fort = 11o 1000inektsnekt 
440 for i=0to999enektspokes + 24,0 
500 gosub 10008print" CRVS-aan 3 k}ok? " 

510 pokes+1, 1308pokes + 5,98pokes+15,30 
Ipokes+24,15 

520 -forl = 11 o 1 2 8 pokes + 4,21 i -fort = 0to799 
I neKti gosub999spokes+4,20if ort = 0to 
7998 nekt 

540 nekti-fori”0to999anextipokes + 24,0s 
end 

999 pr int " [Sxspat i eKRVS-aan ] [opl " 1 "Cl ink 
s] uur "ireturn 
1000 rem initroutine 

1010 poke532B0,int(rnd(0)*16)ipoke532B 

1 , 15i pr int 11 C CLR-HOMED C gr iis 1 3 [7«nser 
n0xrechts3"j 


1020 s = 54272s -for 1 =stos+248 pokel ,0snekt 
1030 return 

*** EINDE LISTING *** 


gel ui den 


regel 

1 

1 16 

r ege 1 

310 

247 

regel 

2 

169 

r eg e 1 

320 

169 

regel 

3 

32 

regel 

330 

71 

regel 

4 

143 

regel 

400 

153 

regel 

100 

142 

regel 

410 

221 

regel 

1 10 

26 

regel 

415 

36 

regel 

120 

21 1 

regel 

420 

1 16 

regel 

130 

134 

regel 

430 

149 

regel 

140 

96 

regel 

440 

71 

regel 

150 

252 

regel 

500 

231 

regel 

160 

180 

regel 

510 

118 

regel 

190 

21 1 

regel 

520 

62 

regel 

191 

190 

regel 

540 

1 89 

regel 

200 

61 

regel 

999 

113 

regel 

210 

217 

regel 

1000 

233 

regel 

220 

75 

regel 

1010 

91 

regel 

230 

70 

regel 

1020 

81 

regel 

240 

1 18 

regel 

1030 

142 

regel 

250 

252 




regel 

260 

71 




regel 

300 

43 

r eady 

• 



Auto regels 


Als u de listings uit ons blad bekijkt, dan valt het u misschien op 
dat, bij de meeste hiervan, de Basicregels elkaar met een 
regelmaat van 10 opvolgen. Dat is geen toeval, meestal hernum- 
meren wij de programma’s omdat een aantal mensen gebruik 
maakt van de 'auto regel’ funktie uit een toolkit. Bij dat extra 
commando worden er dan door de computer automatisch 
regelnummers aangemaakt. Als u bv. 10,10 intikt begint de 
computer bij regel 10 en hoogt dit regelnummer na een return 
met 10 op. 20,5 laat de computer dus bij regel 20 beginnen en 
hoogt de regels met 5 op. Mocht u geen ’toolkit’ met een 
dergelijk commando bezitten dan kunt u dus nu het programma 
van Marco Vogels uit Bréda gaan gebruiken. Deze versie geeft 
het regelnummer inverse weer als het regelnummer dat u intikt al 
bestaat. Het per ongeluk wissen van een regel voorkomt u dus 
op deze manier. 


1 

rem auto-rege 

1 nu 

mmer 

S 




2 

rem door mare 

o V 

ogel 

s 




3 

rem breda 







4 

rem 







30 

for i-B28to947 







40 

readk 8 poksi , k 

i s« 

6 + X 1 

next 




50 

data32,121,0, 

240 

, 16, 

32,253, 

174, 

32 


,235,183,134 







60 

data253,165,20,1 

33,251,165, 

21,1 

33 


,252, 169,92,1 

41 






70 

d at a2,3,169,3 

■ 14 

1,3, 

3,96 

,32 

, 98, 

3, 


76 







80 

d at a134, 164,1 

65, 

251 , 

166,252 

, 133 

,9 


9,134,98,162, 

144 






90 

dat a56,32,73, 

188 

,32, 

221 , : 

189 

, 162 

t 0 


, 189, 1, 1 







100 

data240,9,157 

,0, 

2, 32 

,210, 

, 255,232, 


208,242,165 
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UTILITIES 2 


110 dat«251,24,101,253,133,251,144,2, 
230,252,169,32 

120 dat«32,210,255,32,207,255,201,13, 
240,3,76,105 

130 datal65,165,251,229,253,133,251,1 
76,2,198,252,169 

140 datal31,160,164,141,2,3,140,3,3,7 
6,118,165 

150 if b< >15495thenpr int "-fout in data 
’s"iend 

160 print" ok " 

*** EINDE LISTING *** 


auto regels 

regel 1 13 

regel 2 5 

regel 3 23 

regel 4 1* 

regel 30 1 

regel 40 1 

regel 50 *i 
regel 60 7 

regel 70 1 

regel 80 7 


regel 90 
regel 100 
regel 110 
regel 120 
regel 130 
regel 140 
regel 150 
regel 160 

ready. 


Afronden 


r Het volgende programma is een subroutihe die getallen afrondt. 
Het is geschreven door P.Smithuis en legt eigenlijk zichzelf al 
werkende uit. 


Autorun 


Deze routine laadt een op te geven programma in het geheugen 
en RUNt het. U kunt natuurlijk het programma ook zodanig 
ombouwen dat dit een, van te voren door u opgegeven, pro¬ 
gramma laadt. 





lfutoru . m 


I 


■ 




!#si®s 


1 rem af ronden 

2 rem door p smithuis 

3 rem barchem / ©5734-438 

4 rem 

10 pr int " CCLR —HOME]CHOME3C2xneer1 * 

af te ronden getal s 
2© open 50,0 
3© i nput#50 ,k tprint 

4© print "Cneerl # aantal decimal enC3xsp 
at ie]: "j 

50 input#50,y:y=int(y+0.5> 

6 © close 5@iprint 

70 pr i nt " [2xneer 3 # afgeronde getal 

C 4x spatie]i "5 (int (x*10Ty+0.5) )/I 
01 y 

80 wait198,1,0sgoto 10 
*** EINDE LISTING *** 


a-f randen 

regel 1 
regel 2 
regel 3 
regel 4 
regel 10 
regel 20 
regel 30 


regel 40 
regel 50 
regel 60 
regel 70 
regel 80 

ready. 


wÊÈÊSÊÈÊÊÊSBÊÊË 




1 rem autorun 

2 rem door don freijters 

3 rem uden / 04132-64500 

4 rem 

10 print" geef de naam van de file di 
e geladen" 

20 input"moet worden en druk op <ret 
urn>"|at 

100 poke56578,peek(56578)or3« poke5657 
6 , (peek(56576)and252)or3ipoke648, 
4 

110 q*-chr*(34)ipok»532B0,0ipoke53281 
, 0 

120 print" [CLR-HOME]CZWART]10"q*a*q*" 
,8C4xneerl"sprint"run" 

130 poke631,19spoke632,13ipoke633,13! 
pokel98,3iend 

500 rem tip...ook voor ,8,1 prg’s 

510 rem ook een sys-nummer i.p. 

v. 'run’ 

*#* EINDE LISTING *** 


autorun 


regel 

1 

1 89 

regel 

1 20 

98 

regel 

2 

82 

regel 

130 

76 

regel 

3 

16 

regel 

500 

89 

regel 

4 

143 

regel 

510 

12 


regel 10 
regel 20 
regel 100 
regel 110 


ready. 
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I ■ UTILITIES 3 1 


Omlijst 


De titel is de funktie van het programma. Niet spectaculair maar 
wel nuttig om eens te bekijken als u problemen heeft uw cursor 
in een programma te sturen. 


1 

rem 

omlijst 

2 

rem 

door 

don freijters 

3 

rem 

uden 

/ 04132-64500 

4 

rem 




5 print"CCLR-HOME3CWIT] " 

10 f ar i=lto3Bs pr int " C RVS-aan 3 SSC R VS-u i t 1 " 


; :nex t 

20 rorl = lto22:print"[neer][l inksKRVS-aa 
nlSSfCRVS-uit] ";:next 

30 fori=lto37:print"12x1 inksKRVS-aan] 
SÜCRVS-uitl " ; i next 

40 fori=lto22«print"Cop3Cllnks][RVS-aan] 
®CRVS-uit] M 5 inext 

*** EINDE LISTIN 6 *** 


omlijst 


regel 

1 

177 

regel 

20 

1B7 

regel 

2 

82 

regel 

30 

77 

regel 

3 

16 

regel 

40 

59 

regel 

4 

143 




regel 

5 

117 




regel 

10 

20 

ready. 




Toetstest 


Met dit programma kunt u behalve het testen op de Shift- 
Commodorelogo- en Controltoets, ook uw spreekvaardigheid 
toetsen. Spreekt u de titel maar eens tien keer snel achter elkaar 
uit. 


1 rem toetstest / cbm-64 

2 rem door don -freijters 

3 rem uden / 04132-64500 

4 rem 

5 poke53280,0s poke53281,0s print"CCLR-HO 
MEKneerKWIT3":printchr*(8) 

10 i f peek (653) =1 thenpr i nt " Copjsh i-f t 
is ingedruktC20xspatie]“ 

20 i-f peak (653! ”2thenpr int " Cop 3de co 

mmodore-toets is i ngedruktC7xspatie 1 " 
30 i-f pee k < 653) =3t henpr i n t " C op 3 sh i-f t 

-•-commodore zijn i n g edr uk t C Bx spat i e 3 " 

40 i-f pee k ( 653 ) =4t henpr i n t " C op 3 cont r 
ol is ingedruktClBxspatiel” 

50 if peek ( 653)=5thenprint"Cop 3shift 
♦contral zijn ingedrukt C lOxBpat ie3 " 

60 if peek<653)=6thenprint"Cop 3commo 

dore + control zijn i ngedruktC 6 xspatie3" 
70 if peek(653)=7thenprint"Cop 3contr 
o 1 +sh i f t +c ommodor e zijn ingedrukt ' 1 
80 gotol 0 

*** EINDE LISTING *** 


toet st est 


regel 

i 

246 

regel 

40 

161 

regel 

2 

82 

regel 

50 

234 

regel 

3 

16 

regel 

60 

18 

regel 

4 

143 

regel 

70 

188 

regel 

5 

8 

regel 

80 

234 

regel 

10 

251 




regel 

20 

104 




regel 

30 

108 

r eady. 




Diskroutine 


Met behulp van deze routine kunt u testen of een bepaalde file 
op de diskette, die in de diskdrive aanwezig is, staat. Ook test hij 
op het aanwezig zijn van een schijf. U kunt nu dus voorkomen 
dat uw programma, bij een van deze problemen, door de fout 
stopt. 


1 rem diskroutine 

2 rem door don freijters 

3 rem uden / 04132-64500 

4 rem 

24 open 15,8, 15, "i0"sgosub3000 

25 rem of ... . 

32 open2,8,2,"0 1 adr.seq , s , r" 

33 gosub3000 

100 c1ose15sc1ose2:end 
3000 input#15,ne,xS,yS,zS 
3010 ifne*0thenreturn 
3020 ifx*="ok"thenreturn 
3030 ifxS="read error”then3130 
3040 ifx*="file not found"then3150 
3099 printutïreturn 

3130 print"CCLR-H0ME3 C7xneer3C2xspatie3 
er zit geen diskette in de disk-d 
rive":end 

3140 closel5sfora=lto2000:next 

3149 c1r!run 

3150 print"CCLR-HOME3 C7xneer 3 C2xspatie3 
bestand bestaat nog niet of" 

3154 print"C2xspatie3de verkeerde disk 
ette zit erin." 

3155 c1ose15sfora=11o2000 1 next 
3159 c1r:end 

*** EINDE LISTING *** 


d i s kroutine 




regel 

1 

224 

regel 

3040 

250 

regel 

2 

82 

regel 

3099 

221 

regel 

3 

16 

regel 

3130 

157 

regel 

4 

143 

regel 

3140 

7 

regel 

24 

110 

regel 

3149 

96 

regel 

25 

220 

regel 

3150 

149 

regel 

32 

88 

regel 

3154 

179 

regel 

33 

80 

regel 

3155 

7 

regel 

100 

204 

regel 

3159 

86 

regel 

3000 

164 




regel 

3010 

53 




regel 

3020 

204 

r eady. 



regel 

3030 

17 
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Chipkontakt 64 


In de reeks schermbeelden van superkwaliteit weer een Com¬ 
modore- Info Logo. Dit lijkt allemaal reclame, maar de bedoeling 
begrijpt u wel, u kunt hiermee zelf schermteksten maken en 
eigen woorden invullen op dezelfde manier. Van Mare Poncelet 
ontvingen we een logo van een opmerkelijke kwaliteit. De 
animatie (beweging) is leuk om te volgen, en wordt zienderogen 
spannender. Het is jammer dat dit wel tenslotte fataal voor enige 
chips afloopt. Laat dit echter geen reden zijn om het programma 
niet in te tikken en het te runnen. Wat ik nu bedoel met 'fataal 
aflopen’ ziet u dan vanzelf. 


1 rem chipcontact 

2 rem door mare poncelet 

3 rem tienen(bel) / 016-814590 

4 rem 

10 forw=lto500inextw!poke532ai,0spoke 
53280,6:gosub60 
20 -f or x = 11 o2000 : nex t 
30 gosub230 
40 -f or x = 11o2000 1 nex t 
50 gosub330 

60 forx=246to46step-40:print"CCLR-HOME 
]CWIT]":printtab< x )"C2xspatie3CRVS- 
aan][2xspatie][RVS-uit][2xspatiel 
[RVS-aan3C2xspatie]S8[RVS-uit] [RVS- 
aan] [RVS-uit3C2xspatie]CRVS-aan1 
[5x sp at ielCRVS-uit1C 2x sp atiel C RVS-a 
an]88C3xspatie][RVS — uit]" 

70 printtab(8)“[RVS-aan][2xspatie] 

CRVS-uit]C2xspatie]CRVS-aan] C2xspat 
ie] CRVS-uit ]®ÏC RVS-aan] SS CRVS-uit] 
C2xspatie]CRVS-aan]C2xspatie3 CRVS-u 
it] C4xspat ie] CRVS-aan38S CRVS-uit] 
S8C2xspat ie] [ROOD] CRVS-aan ]C3xspat ie 
3 CRVS-uit 3S8CWIT] " 

80 printtab(8)"CRVS-aan3C2xspat ie] 

CRVS-uit]C2xspatie3 CRVS-aan]C2xspat 
ie 3 C RVS-uit] SCRVS-aan] CRVS-uit] 
C2xspatie]CRVS-aan]C4xspatie]CRVS-u 
it]C2xspatie][RVS-aan]C2xspatie3 

CRVS-uit]C3xspatie3CROOD]-[WIT]" 

90 printtab(8)"CRVS-aan]C2xspatie] 

CRVS-uit3C2xspatie]CRVS-aan3C2xspat 
ie]CRVS-uit]C2xspat ie]CRVS-aan] 
CRVS-uit3C2xspatie]CRVS-aan 3C2xspa 
tie]CRVS-uit3 C4xspat ie]CRVS-aan3 
C2xspatie]CRVS-uit]C3xspatie][BLAUW 
]»«CWIT3 " 

100 printtab(8)"CRVS-aan]C2xspatie3 

[RVS-uit3C2xspatie][RVS-aan]C2xspat 
ie]CRVS-uit]C2xspatie3CRVS-aan] 
CRVS-uit3C2xspatie3CRVS-aan]C2xspa 
t ie] CRVS-uit 3 C 4xspat i e 3 SSC RVS-aan 3 
SSCR VS-uit 3C2xspatie3C BLAUW 3CRVS-aa 
n3C3xspatie]SCRVS-uit]CWIT3" 

110 printtab (8) "CRVS-aan]C2xspatie] 

CRVS-uit3C2xspat ie]CRVS-aan]C2xspat 
ie]CRVS-uit3C2xspat ie]CRVS-aan3 
CRVS-uit3C2xspatie]CRVS-aan3C2xspa 
t ie] CRVS-uit 3 C5x spat ie3SSC RVS-aan] 
C3xspatie]CRVS-uit]" 

120 forw=1t 0200 :nextwinextx 

130 -forx=0to31 

140 pokel028+x,98:poke55300+x,linext 

150 forx=40to320step40 

160 pokel059+x,225:poke55331+x,lsnext 

170 f orx=31t o0st ep-1 

180 pokel38B + x,226s poke55660 + x, 1s next 

190 -f or x — 32Ot o4Os t ep — 40 


200 pokel028+x,97spoke55300+x,lsnext 
210 prin11ab<55) " commodore CWIT3" 

220 return 

230 pr inttab ( 6 ) " C RVS-aan 3 S 8 C RVS-u i 13 
S 8 I " jspe (24); " CRVS-aan ]8CRVS-uit3 
Sêl " 

240 printtab (5) " C RVS-aan 3 SSC RVS-u i t 3 

SS I-" ; spe (23) ; " CRVS-aan38CRVS-uit3 
SSC r ech t s 31 " 

250 printtab (4) "CRVS-aan38CRVS-uit3 
SSCrechts] !-" j spe(22) j " CRVS-aan 3 
SSCRVS-uit3SS[2xrechts3l " 

260 -f or i = 11o7 

270 printtab(4)"CRVS-aan] CRVS-uit3 
-CRVS-aan 3 Crechts 3 CRVS-uit3 I-"; 
spe <21); "-CRVS-aan] C3xrechts]CRVS- 
uit 3 I " 

280 nex ti 

290 printtab<4)"CRVS-aan] CRVS-uit] 
-CRVS-aan]Crechts]CRVS-uit3N “; 
spe <21) 5 "-[RVS-aan] C2xrechts3CRVS- 
u i t 3 N " 

300 printtab(4) " CRVS-aan3 CRVS-uit] 

— CRVS —aan3CRVS —uit]N ",-spc<22); 
"-CRVS-aan 3 Crechts3 CRVS-uit 3N" 

310 printtab<4)"CRVS-aan] CRVS-uit] 

N ";spc<23>j"-CRVS-aan] CRVS-uit] 

N " 

320 return 
330 k1=5 

340 ■forx = ltol3:pokel62B + x,64spoke55 
901+x,kl:pokel654-x,64:poke5592 
6 -x,kl 

350 pokel552 + x,64s poke55B24 + x,klspoke 
1575-x,64ipoke55847-x,kl 
360 nextxii f kl=5thenk1=2:goto340 
370 forl=ltol5iforx=lto5spoke53280, 
x:poke532Bl,1inextxsnextl 
380 poke53281,©sprint"C3xop3";sforq 

=lto5sprint"CGEEL]Cop3C13xrechts3 

chipcontact" 

390 for w=1to450:nextw 
400 print"CRVS-aan3Cap]C13xrechts]c 
hipcontactCRVS-uiti"sforw=lto30 
0 snextwsnextqsgotol 0 

*** EINDE LISTING *** 


chipcontact 


regel 

1 

191 

regel 

200 

233 

regel 

2 

64 

regel 

210 

189 

regel 

3 

164 

regel 

220 

142 

regel 

4 

143 

regel 

230 

4 

regel 

10 

153 

regel 

240 

225 

regel 

20 

222 

regel 

250 

40 

regel 

30 

34 

regel 

260 

136 

regel 

40 

222 

regel 

270 

196 

regel 

50 

35 

regel 

280 

203 

regel 

60 

147 

regel 

290 

40 

regel 

70 

147 

regel 

300 

239 

regel 

80 

61 

regel 

310 

1 1 1 

regel 

90 

100 

regel 

320 

142 

regel 

100 

122 

regel 

330 

126 

regel 

1 10 

244 

regel 

340 

1 16 

regel 

120 

24 

regel 

350 

122 

regel 

130 

195 

regel 

360 

153 

regel 

140 

234 

regel 

370 

72 

regel 

150 

53 

regel 

380 

1 78 

regel 

160 

26 

regel 

390 

1 1 

regel 

170 

72 

regel 

400 

43 

regel 

180 

37 



regel 

190 

224 

ready. 














Vlaffffen 


Dit programma is bedoeld om de diverse vlaggen te leren 
kennen. Het programma is voor verbetering en vooral uitbrei¬ 
ding vatbaar. Zo geeft het bijvoorbeeld bij een fout niet aan wat 
het juiste antwoord zou moeten zijn, en heeft elke keer dezelfde 
volgorde. U moet het programma dus zien als een basis om zelf 
verder aan te werken. 



rem vlaggen 

rem door arien de korte 

rem uit roekan ie 

rem 

poke53280,lspokeS3281,lsprinf'CCLR- 
H0ME3 " 

print"[5xneer 3[ZWART][5xspat ie] 


20 print 
de 

30 pr i nt " [neer] I [2xspatie3 I I [2xspati 
e ] 0~P 0“ O - Q— IM I 

40 print" M[2xspatie3N I [2xspatie3 
I I I P I P I C I Ml 

50 print"[2xspatie3MN[2xspatie3L_ 

O-P L/ L/l_|[2xspatie3l 

60 pr i nt “ [neer 3[5xspatie3 van europ 
a 

70 fori=0to2000s nextipoke532B0,15: 
poke5328i,15 

80 gosub2B0 

90 print"[2xneer][RVS-aan][ROOD][6xspa 
tie] [neer][6x1inks][ W I T 3C6xspatie3 
[n»er3[6xlinkB][BLAUW3[6xspatie3 
[RVS-uit3" 

100 lt="nederland"sgosubl90 

110 print"[2xneer3[RVS-aan][ZWART3[2xsp 
at ie] [GEEL 3[2x sp atie][ROOD 3[2x spati 
e]Cneer][&xlinks](ZHART][2«Bpatie] 
[GEEL3[2xspatie][ROOD][2xspatie3 
[neer ][6xlinks][ZWART3£2xspatie] 
C6EEL] [2xspatie]CROOD 3 C2xspatie] 

[RVS-uit 3" 

120 11 = " belgie":gosub190 

130 print" [2xneer3[RVS-aan][ZWART]C6xsp 
atie][neer]C6xlinks][R00D][6xspatie 
3[neer3[óxlinks][GEEL][6xspatie3 
[RVS — uit]" 

140 l$="west-duitsland":gosubl90 

150 pr int " C2xneer3[RVS-aan3[BLAUW3[2xsp 
atie][WlT][2xspatie][R00D][2xspatie 
3[neer 3[6x1inks3[BLAUW3[2xspatie3 
[WIT3£2xspatie][RCIOD3[2xspatie3 


[neer 3[6x1inks3[BLAUW3[2xspatie3 
[WIT3[2xspatie][ROOD3t2xspatie3 
[RVS—uit]" 

160 lt=" frankrijk":gosubl90 
170 print"[2xneer3[RVS-aan][ROOD][6xspa 
tie][neer3[6xlinks3[GEEL3[6xspatie3 
[neer][6xlinks][ROOD3[6xspatie3 
[RVS-uit3" 

180 1t ="spanje“sgosub190 
190 pr intspe<B)"[3xop3[ZWART]van we 
lk land is deze vlag "t printspe( 

8)leftt(nt,15) 

200 printspe (8) ; : inputant: ifantOl* 
thengosub240 

210 ifant-ltthengosub260 
220 v = v+l: i f v = 51 hen-f or i =0t o2000: nex t 
igoto340 
230 return 

240 gosub310:printspc(8)"[3xop 3[ZWART 3 
dat is [RVS-aan3[ROOD] fout [RVS-ui 
t3[ZWART]"!print"[op3"spc(8)leftt 
(nt, 15) 

250 f=f+liraturn 

260 gosub310;printspe(8)"[3xop][6EEL3 

[RVS-aan3[2xspatie3goed zo[2xspatie 
][RVS-uit3[ZWART3"sprint"[op]"spe( 
8)leftt (nt, 15) 

270 return 

280 print" [CLR-HOME3[ZWART3hoe heet 
j e “ j s inputn*!print"[HOME3[neer3 
[1.b1auw3[5xspatie3 de vlaggen v 
an europa[6xspat i e3 " 

290 pr int " [HOME][40xspatiel" 

300 return 

310 printspe <8) "[3xop][32xspatie3"s 
320 printspc(8)"[32xspatie3"| 

330 printspe(8)"[32xspatie3"5ireturn 
340 print "[3xneer3":fori=0to500:next 
sprint"[3xop 3je hebt in totaal " 
f" fout gemaakt,", 

350 printleftt(nt,15)sfori=0to4000s 
nextsprint"[28xneer3[HOME]":end 

*»» EINDE LISTING **» 


vlaggen 





regel 

1 

147 

regel 

1 80 

136 

regel 

2 

65 

regel 

190 

67 

regel 

3 

206 

regel 

200 

99 

regel 

4 

143 

regel 

210 

44 

regel 

10 

209 

regel 

220 

10 

regel 

20 

41 

regel 

23© 

142 

regel 

30 

168 

regel 

240 

81 

regel 

40 

1 8 

regel 

250 

225 

regel 

50 

187 

regel 

260 

88 

regel 

60 

125 

regel 

270 

142 

regel 

70 

153 

regel 

280 

1 6 

regel 

80 

39 

regel 

290 

240 

regel 

90 

97 

regel 

300 

142 

regel 

1 00 

84 

regel 

3 1 0 

2 1 0 

regel 

1 10 

255 

regel 

320 

31 

regel 

120 

1 1 1 

regel 

330 

231 

regel 

1 30 

107 

regel 

340 

221 

regel 

140 

223 

regel 

350 

128 

regel 

150 

225 




regel 

160 

105 




regel 

1 70 

247 

r ead y. 
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r 


Heenenweer 64 


Nog maar een beeldmerk. Dat je een logo op een heel aanntal 
verschillende manieren kunt vormgeven wordt u snel duidelijk 
als u er een paar intikt. Mocht u een hekel aan tikwerk hebben 
dan is dit toch wel een erg korte en geeft in weinig regels een 
goed idee van wat een logo nu is. 



1 rem heenenweer 

2 rem door ter groen 

3 rem uit deurne 

4 rem 

10 print "CCLR-HOME3" 

20 poke532B0,0;poke53281,0sq=q+l 
30 if q/2=int(q/2) then a=20:b=0:z 

= -l 

40 if q/2<>int(q72> then a=0sb=2@: 

z = 1 

50 for x = a to b step z 

60 print tab( x + 1 > ; " CROOD 3CRVS-aan3 

c CRVS-uitlCWIT3CRVS-aan] b CRVS-ui 
t3 Cl.blauw]CRVS-aanl m CRVS-uit3 
Cl.roDdHRVS-aan] . C RVS-u i t 3 E GROEN 
3 C RVS —aan 3 6 CRVS —uit 3 C GEEL 3[RVS-aa 
n3 4 [RVS-uit3" 

70 printtab ( 255) ; "CHOME 3 C5xneer 3" 

80 next 
90 goto 20 


*** EINDE LISTING *** 


heenenweer 

regel 1 i 
regel 2 
regel 3 < 

regel 4 
regel 10 
regel 20 
regel 30 
regel 40 


regel 50 
regel 60 
regel 70 
regel 80 
regel 90 


ready. 


3D tekst 


Een fraai gemaakt logo van Remco de Zwart uit Den Haag. U 
kunt, het kan niet vaak genoeg gezegd worden, al deze logo’s 
natuurlijk aanpassen en geschikt maken voor uw eigen pro¬ 
gramma’s. 


1 rem 3d-tekst 

2 rem door remco de zwart 

3 rem uit den haag 

4 rem 

10 poke532B0,0:poke532Bl,©sprint"CCLR- 
HOME] " j ! f orn=l to40s a$ = a*+“ Cneer ] 11 
ibt=b$+"[rechts!"snext 
20 c*="commodore infc = len(ct):dim 
a$ ( c) ,bt(c,3) , a (c ) 

30 forn=1to40:d$=de$=e*+" "s 
ft=f^+ u Clinksl"!g$=g$+"[op]"!next 
sprint"CWIT3CCLR-H0ME3"} 

40 forn=ltociai(n)= ,, r" + left*(d*,n) 

+ " i " 

50 form=ltonsa*(n)=a$<n)+"Cneer3"+ 
lerttlft,n + 2 > 

60 iflen(a$(n))>200thenb$(n,a<n))= 
attnl!a$(nl=""sa(n)=a(nl+l 
70 i f m=int (n/2+. 5) thenat (n)=at (n) + 

“ I" +left*<c*,n>+" I" sgoto90 
80 a$(n>=a!k(n>+" I " + lef tt (B*,p) + " I " 

90 next: at(n)= a * <n)+"[neer]" + 1eft$ 

(ft,n + 2)+" l " + left$(dt,n) + l,J "snext 

100 b = 2 4/c 

110 forn=ltoes print"tHOME3";left*(a 
*» n/b >;left*(b*,n);sgosub210 

120 nexts -form=lto300: next: forn = ctol 
step-lsprint"CH0ME3“jlefttlat.c 
/ b )jleftt(bt,n); 

130 gosub210inextsn=1 

140 form=c/b-2tolstep-l : print" CH0ME3 " 

;left*(at,m) ; "Crechts3";sgosub2 
10:nex t 

150 form=lto35:print"CHOME3"5left*< 
b * , m )ssgosub210:next 

160 forn-ltociprint" C HOME 3!' | lefttla 
*,n/b>|left*< b *,38-n*2>;sgosub2 

1 0 s nex 1 1 n = c 

170 form=3B-c*2to3S-cstep2 a print" C HOME3" 
;left$(a$,c/b) ;leftttb*,®) ; s gosub 

2 1 0 s nex t 

180 form = 37-ctolstep-liprint“CHOME 3" 

;left$(a»,n/b) 1 left$(b$,e);: n = n 
c/ ( 38 —c) 

190 gosub210inext 

200 forn = ltol200:next:print"C CLR —HOME 3" 

: g o t o 110 

210 printbt(n,0) j b* < n,1)(b${n,2)jb* 

< n , 3);a$(n);ireturn 

* * * EINDE LISTING *** 

3d tekst 


regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 


1 

1 90 

regel 

1 10 

174 

2 

90 

regel 

120 

104 

3 

105 

regel 

130 

71 

4 

143 

regel 

140 

50 

1 0 

50 

regel 

150 

107 

20 

23 

regel 

160 

219 

30 

2 

regel 

170 

84 

40 

190 

regel 

180 

185 

50 

25 

regel 

190 

220 

60 

15 

regel 

200 

212 

70 

1 45 

regel 

210 

22 


f31 


Hf 


ready 
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I VU Meter 


Ik denk dat Erik Geertsema een cassettedeck bezit van dezelfde 
firma die mijn deck gemaakt heeft. Dit daar z’n programma VU 
METER een getrouwe weergave is van de meters van mijn 
recorder. Let u bijvoorbeeld eens op de details als de peak 
(hoogste waarde) aanduiding. Deze blijft even staan als de 
meter zich terug trekt. Dit dient om de de instelling van de meter 
te vereenvoudigen. Op de computer hoeft u daarentegen niets 
in te stellen. Een heel leuke gedachte, de computer als meet¬ 
instrument. In wezen zou dit soort schermwerk gecombineerd 
moeten worden met de A/D interfaces zoals die van Marklin, 
Fisher Techniek en Maris Electronika op de markt zijn. 


rem vu meter 

rem door erik geertsema 

rem uit zeist 

rem 

poke53280,0:poke53281,0 
print"CCLR-HOME1C2xneerl Cl.groent 
1C23xspatie]Coraniet 116xspatiel“ 
print "Cl.groenl-20 CoranielCRVS-aan 
] peak CRVS-ui11C1.groen 3 6 . 4 
. 2 . CoranielO . 2Cgriis 31CRVS-a 


Log’oboom 


1 


Eigenlijk hoort dit programma van Martin de Vries tussen de 
miniatuurtjes thuis. Daar we nu in deze rubriek toch een aantal 
logo en animatie (beweging) programma’s brengen treft u hem 
hier aan. Ook hier ziet u dat u met weinig regels een leuk effect 
kunt krijgen. 


1 rem info 

2 rem door martin de vries 

3 rem zwaag / 02290-31039 

4 rem 

10 print “CCLR-HQMED" 

20 pokeS3280,0ipokeS3281,0 
30 for a=l tol5:poke 646,a 
40 let a$="cammodore info" 

50 f ori = 1to6 

60 print tab< 15-i ) ; mid$(a$,7-i,5* i 
) 

70 for x=1to1 00 tnext x 
80 next i,atgoto 20 

*** EINDE LISTING *** 
logo boom 



«nll 1 CRVS-uitlCoranie]. 6 8 ." 

regel 

1 

187 

regel 

40 

180 

40 

print" CneerlCl.groen]rC23xspatie3 

regel 

2 

160 

regel 

50 

135 


Coranie3C16xspatiel >> sprinttab(l 

regel 

3 

98 

regel 

60 

39 


0)"C2xneer3harakiriC2xspatielyo 

regel 

4 

143 

regel 

70 

5 


kohama E PURPER 3" 

regel 

10 

1 12 

regel 

80 

93 

50 

sc=1106:sh=1266ssp=32ivu=231 

regel 

20 

37 




60 

a=int(rnd(0)*7)id=int(rnd(0)*7) 

regel 

30 

141 

ready. 




g = int(rnd(0)*28):a = g + a s d = g + d sprint 

" CHOME3"a"Clinks] ” 

s=sgn< a—b) 

u = sgn(d-e) 

ifw=—lthenpokec,sp 

ifs=lthenforx=sc+btosc+aspokex, 

vu:fort=0to5snextsnext 

print"C7xneer3"d"Clinks] "jsifz 

=-lthenpokef,sp 


ifu=lthenforx=s 
vusfort=0to5ine 
ifs“-lthenforx= 
-lspokex,spsfor 
ifu=-lthenforx= 
-lipokexjspsfor 
w = s: ifw = -lthenc 
z=u:ifz=-lthenf 
fort=0to0: next 
b =a 
e = d 

goto60 


*** EINDE LISTING *** 


h + etosh + ds pokex , 
x t s nex t 

sc+b-ltosc+astep 
t=0to5snext:next 
sh+e-ltosh+dstep 
t=0to5:nextsnext 
= sc + b 
= sh + e 


otcr 


vu meter 





regel 

1 

183 

regel 

110 

220 

regel 

2 

139 

regel 

120 

180 

regel 

3 

16 

regel 

130 

238 

regel 

4 

143 

regel 

1 40 

224 

regel 

10 

37 

regel 

150 

242 

regel 

20 

248 

regel 

160 

36 

regel 

30 

13 

regel 

170 

55 

regel 

40 

0 

regel 

180 

71 

regel 

50 

135 

regel 

1 90 

53 

regel 

60 

109 

regel 

200 

59 

regel 

70 

97 

regel 

210 

239 

regel 

80 

56 




regel 

90 

64 




regel 

100 

192 

ready. 




Veel gebruikers van cassette¬ 
recorders tbv de computer 
Commodore 64 ergeren zich 
tijdens het laden van een met 
de Commodore gemaakt pro¬ 
gramma aan de melding op het 
scherm: load error. De oor¬ 
zaak ligt in het feit dat een band 
is gevuld door ’n recorder met 
een kopstand (azimuth), die af¬ 
wijkt van de recorder waarmee 
geladen wordt. Zonder hulp¬ 
middelen is het praktisch bijna 
onmogelijk om de juiste stand 
van de kop te vinden. 


Listings vervolg op pag. 5' 


Door de NO LOAD ERROR in 

de recorder in te bouwen be¬ 
hoort het probleem tot het ver¬ 
leden. 

Deze van een LED (lampje) 
voorziene module kan door de 
meesten zelf met wat knutsel¬ 
werk worden ingebouwd, daar 
een volledig montagevoor- 
schrift wordt meegeleverd. 
Met een schroevendraaiertje 
kan men nu zelf de juiste stand 
van de kop afstellen. Het lamp¬ 
je zal dan zo fel mogelijk 
branden. 

Voor meer informatie: E.H.B. 
Handelsonderneming, Schu- 
bertlaan 16,4904 MKOoster- 
hout. Telefoon 01620-54798. 


De NO LOAD ERROR is ver¬ 
krijgbaar bij de vakhandel en 
kost ca. ƒ 69,-. 


wm 

WÊÊÏÏm. 
















Commodore 


ONAFHANKELIJKE INFORMATIE VOOR PROFESSIONELE COMMODORE GEBRUIKERS 

Toen Commodore in 1976 met de PET computer op de markt kwam, was dat in eerste instantie een 
duidelijke hobbycomputer. Maar vooral in Europa heeft CBM zich toch al snel ook op de professionele 
toepassingen van de microcomputer geworpen en werd de 4000 en 8000 serie in het begin van de jaren 
tachtig een van de meest succesvolle kleine zakelijke systemen. Met de PC-10 heeft men sinds voorjaar 
1985 opnieuw een populair systeem voor het bedrijfsleven op de markt gebracht. In 1986 zal 
ongetwijfeld ook de Amiga bij ons verkrijgbaar worden en daarmee is Commodore Business Machines 
weer helemaal terug op de zakelijke markt. Omdat we als Commodore blad wel aandacht aan deze 
systemen willen besteden, maar dat niet teveel willen vermengen met de informatie voor de 
computerhobbyisten, ruimen we voortaan een apart deel van dit blad in voor die zakelijke toepassin¬ 
gen. We noemen dit blad in het blad natuurlijk "COMMODORE BUSINESS INFO” en hopen, dat we de 
bezitters van de hierin beschreven systemen en degenen, die willen doorgroeien naar zo’n systeem, 
hiermee een plezier doen. 

U it een onlangs door Sala Com¬ 
munications gehouden enquete 
onder computergebruikers 
bleek, dat maar liefst 49% van de 
Commodore bezitters de com¬ 
puter thuis gebruikt voor serieuze toe¬ 
passingen zoals tekstverwerking of be¬ 
standsbeheer. Ruim 14% van alle bezit¬ 
ters gebruikt de computer ook voor een 
produktieve toepassing op het werk. 

Er is een ruime belangstelling voor de 
"personal productivity” toepassingen, zo¬ 
als de Amerikanen dingen als tekstverwer¬ 
king met een hobbycomputer noemen. 

Maar met de ontwikkeling van de huiscom- 
puter neemt de capaciteit van die dingen 
toe en langzamerhand is het onderscheid 
tussen hobby-en professionele micro bijna 
vervaagd. De C-128 is een grote stap in die 
richting, maar ook de toenemende popula¬ 
riteit van de MS-DOS machines voor parti¬ 
culier gebruik onderstreept dit. Commo¬ 
dore heeft zelfs met de Amiga een pas¬ 
send aanbod voor wie nog verder wil gaan 
en met super-graphics aan de gang wil. 

Voor 5000 gulden of minder - voor wie 
goed zoekt en op het gebied van service, 
betalingscondities en garantie wat water in 
de wijn wil doen - heeft men een complete 
micro. Dat wil zeggen met professioneel 


toetsenbord, monitor, dubbele diskdrive, 
256 KB geheugen en vooral ook universele 
printer-, monitor-, en RS 232-interfaces. 
Soms kan men voor die prijs zelfs nog wat 
software op de koop toe krijgen, een prin¬ 
ter erbij en dan staat daar een gebruiksge- 
reed systeem, dat voor weinig terugdeinst. 
Bestanden van vele tienduizenden re¬ 
cords, een complete boekhouding voor 
een klein- of middelgroot bedrijf, tekstbe¬ 
werking of ledenadministratie, het kan er 
allemaal op. 

Dienstverlening 

Het aandeel van de MS-DOS machines in 


het Nederlandse particuliere en klein-za- 
kelijk computerpark bedraagt ongeveer 
9% en bij een totaal van ongeveer 400.000 
min of meer actieve micro-gebruikers be¬ 
tekent dat meer dan 35.000 machines. 
Onder de lezers van Commodore-lnfo 
blijkt dat 8% te zijn. Maar wanneer we 
kijken naar diegenen, die hun Commodore 
ook voor serieuze toepassingen gebrui¬ 
ken, dan blijkt 16% ook nog een MS-DOS 
machine ter beschikking te hebben. Voor 
die groep is voortaan Commodore Busi¬ 
ness Info, een concentratie van nieuws en 
artikelen over de MS-DOS (én Amiga) we¬ 
reld in Commodore Info. Luc Sala. 



m 


11 


De PC-10 is als MS-DOS machine 
een belangrijk onderdeel van 
Commodore Business Info. 
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Met duizenden tevreden PC-10 bezitters en steeds meer Commodore bezitters, die 
ook hun neus in de MS-DOS wereld steken, kunnen we niet nalaten om ook in 
Commodore-lnfo nieuws over MS-DOS te geven. Het allernieuwste uit de VS voor 
verwende PC gebruikers. 



Nieuwe PC software 


M et een stapel nieuwe soft- 
ware-pakketten vers uit de VS 
gingen we aan de slag. Micro¬ 
soft heeft eindelijk Windows 
klaar en er zijn hele reeksen 
spellingscheckers uitgekomen. Nog 
meer venster-software en een hele 
reeks "interrupt-driven accesoires” ma¬ 
ken het MS-DOS leven weer wat gemak¬ 
kelijker. 

Dat een beetje humor tijdens het werk ook 
goed is voor de werksfeer en de producti¬ 
viteit, weten we natuurlijk al lang. 

Chuckle Pops 

Dit programma laat de gebruiker bij het 
indrukken van een bepaalde funktietoets 
even. lachen, doordat dan in beeld een 
mop of beeldgrap verschijnt. Voorlopig 
alleen op MS-DOS machines, dit program¬ 
ma is namelijk zeer serieus bedoeld. Men 
beweert, dat inderdaad de productiviteit 
van de gebruiker merkbaar toeneemt en 
dan is de 15 dollar voor dit programma 
natuurlijk snel terugverdiend. Van Enligh- 
ten uit Michigan (313-6686678). 

Windows 

Het heeft erg lang geduurd, voordat Micro¬ 
soft eindelijk met het programma Win¬ 
dows uitkwam, dat men al in nvember 
1983 aankondigde. Het is er nu, het werkt 
goed op de PC-10 zoals we constateerden 
en kost maar 99 dollar. In het begin krijgt 
men er zelfs nog een teken- en een tekst- 
pakket bij. Al meer dan twee jaar geleden 
kondigde men dus dit alternatief voor Top- 
view van IBM aan en men noemde Win¬ 
dows dus terecht "Vapourware”. 
Windows is een venster-besturingssys- 
teem Shell. Dat betekent, dat men eerst 
Windows laad en dan van daaruit allerlei 
disk- en besturingscommando’s kan ge¬ 
ven en ook andere programma’s kan ge¬ 
bruiken. Het geheel lijkt op de manier, 
waarop de Macintosh van Apple met ge¬ 
gevens en files omgaat. Er zijn nu al drie 
van dergelijke venster besturingssyste¬ 
men op de markt, namelijk GEM van Digital 


research, Topview van IBM en nu dus 
Windows. 

Windows is in staat, meerdere program¬ 
ma’s tegelijk ter beschikking te houden en 
zeer snel over te schakelen van de een 
naar de ander, hoewel het geen echte 
multi-tasking toelaat. Er kunnen standaard 
programma’s mee worden gedraaid, maar 
ook speciaal voor Windows geschreven 
toepassingsprogramma’s, die nog beter 
gebruik maken van de functies van Win¬ 
dows, zoals de meegeleverde kalender, 
notepad, calculator en klok. 

Laser printer voor 2000$ 

De prijs van laserprinter begint ook aardig 
te zakken. De goedkoopste is nu de Blaser 
voor 1990 dollar. Dat is de prijs, waarvoor 
een jaar of wat geleden de daisywheels 
over de toonbank gingen. Er zijn komen 
met de Blaser 128 verschillende letterty¬ 
pes mee in de ROM-software, die dan in 8 
groottes kunnen worden afgedrukt. De 
Blaser is natuurlijk compatibel met de IBM- 
PC en soortgenoten. 



Mad Philips 

Binnenkort komt er ook van Philips een 
AT-compatibele machine. Die komt als 
OEM produkt uit Amerika, waar men met 
MAD een contract heeft gesloten voor de 
levering van de Dl 000 micro-’s, die draai¬ 
en met de 80286 processor van Intel en AT 
compatibel zijn. 



Above-board 

Steeds meer en uitgebreider software be¬ 
tekent ook meer behoefte aan RAM ge¬ 
heugenruimte. Nu ondersteunt MS-DOS 
maar 640 KB aan RAM.geheugen en dat 
begint een beknellende zaak te worden 
voor bijvoorbeeld spreadsheet gebruikers 
en wanneer men veel interrupt software in 
RAM gebruiksgereed wil hebben. De in¬ 
dustrie is al een tijdje bezig hiervoor oplos¬ 
singen te vinden en een uitbreiding tot 1 
Megabyte is soms wel mogelijk. Maar een 
echte grote stap vooruit, bijvoorbeeld naar 
de 5 MegaByte range, was er nog niet. Nu 
hebben een aantal bedrijven, die hier mee 
te maken hebben, de koppen bij elkaar 
gestoken en een standaard uitbreiding 
ontworpen. Microsoft, Lotus en Intel wa¬ 
ren de initiatiefnemers achter dit Above 
Board concept, dat tot 8 MegaByte aan 
RAM toelaat. 

DBaselII Plus 

Ashton Tate heeft weer een nieuwe versie 
van dBaselll uitgebracht. De belangrijkste 
verbetering is, dat men nu in een netwerk 
met meerdere gebruikers tegelijk met dit 
database programma kan werken. Ook de 
gebruiksvriendelijkheid is verbeterd, zo 
heeft men er een ”Framework”-achtig ge¬ 
bruikers- interface in gemaakt, dat ook 
werkt met menu’s. De gebruiker kan hier¬ 
mee zonder enige programmmeerkennis 
tot de normale database toepassingen in¬ 
geven en uitvoeren. 
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Interrupt driven software 

De grote trend van dit moment is om 
programma’s te maken, die door middel 
van een bepaalde functietoets of toets- 
combinatie onmiddelijk kunnen worden 
gebruikt. Het lopende programma wordt 
dan gestopt en men kan even iets anders 
doen. Dat betekent wel, dat zo’n extra 
programma in het RAM geheugen geladen 
moet worden en daar dus ruimte in beslag 
neemt. Maar met de tegenwoordige RAM- 
capaciteit van vele honderden of zelfs dui¬ 
zenden KB’s, is dat geen groot probleem 
meer. 

Een bekende toepassing uit deze catego¬ 
rie vormen de zgn. Desktop Accesoires, 
dat zijn dingen als een calculator, een 
agenda, een memoblokje, een klok en der¬ 
gelijke dingen, die normaal op een bureau 
thuishoren, maar nu in het computerge¬ 
heugen zitten en middels een kort com¬ 
mando onmiddelijk actief worden. 

Van verschillende kanten heeft men deze 
techniek nu ook gebruikt voor een Instant 
Spelling Checker, waarmee tijdens het 
invoeren van tekst onmiddelijk de juiste 
spelling gecontroleerd wordt en eventueel 
een verbetering gesuggereerd. Van Bor¬ 
land is er bijvoorbeeld Turbo Lightning, en 
we verwachten dat dit soort programma 
de hele tekstbewerking weer een stap 
verder zullen brengen. 



Computer Photocopier 

Wie zou niet graag de beeldjes, die met 
een fotokopieerapparaat zo gemakkelijk 
worden opgenomen, ook in zijn computer 
willen hebben. Met de SpectraFAX uit 
Florida (813- 775-2737) is dat nu mogelijk. 
Natuurlijk is er dan ook software beschik¬ 
baar om de opgenomen beelden te bewer¬ 
ken, samen te voegen, te verkleinen etc. 
Koppeling met OCR (tekenherkenning), 
facsimile en laserprinters is mogelijk. 


Super project 

Project management eist veel planning en 
organisatie. De computer is een van de 
hulpmiddelen, die daar zeer goed bij kan 
helpen. Van Computer associates is er 
een project management programma, dat 
Superproject heet. Daarmee krijgt men 
voor 495 dollar de beschikking over plan¬ 
ning tools zoals Gantt Chart analyse. 




Wanneer u meer wilt dan hardware tegen de laagste prijs, en ook uw ffile- 
conversie-problemen, software-keuze, custom-software aanpassingen 
zonder zorgen opgelost wilt zien, dan biedt Datavisie u de helpende hand. 

Professioneel automatiseren 

J7 datavisie 

/ J U V software & informatie - services 


Datavisie 

Forel 40, 1261 PK Blaricum 
S 02152-51537. 

Inschr. KvK H’sum 36273. 


Datavisie beheerst het groeipad van de Pet/80XX via de C-64 en C-128 naar 
de MS-DOS wereld van de PC-10 en de 80286 AT-machines en kan u helpen 
een optimale keuze te maken. 

Naast de standaard-software, zoals tekst-, boekhoud- en spreadsheetpak- 
ketten, leveren en ondersteunen wij ook geavanceerde software-utilities, 
via direkte import uit de VS, zoals de Lattice C compiler (ƒ 1790,-), en de 
Clipper dBaselII compiler (ƒ2480,-). 
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De Commodore Amiga heeft in Amerika niet te klagen over belangstelling. Zelfs met 
een beperkt software-aanbod en een tweede versie van het operating systeem als 
remmende factoren loopt de verkoop goed. We spraken met wat Amerikaanse dealers 
en berichten over de nieuwe software voor de Amiga. 

Amiga in de lift 



D e verkoop van de Amiga, die in 
de VS sinds begin october bij 
een beperkt aantal computerza¬ 
ken te koop is, loopt goed en het 
kerstseizoen is daar (ook al met 
de 128) duidelijk een Commodore-zaak 
geworden. Verschillende dealers zijn 
meer dan tevreden en verkochten hon¬ 
derden Amiga’s in de afgelopen 
maanden. 

Men is nu ook bezig de ontwikkeling van 
software wat te stroomlijnen en heeft on¬ 
langs twee belangrijke specificaties gepu¬ 
bliceerd. Dat is Interchange File Format 
IFF, om probleemloze uitwisseling van fi¬ 
les en data tussen programma’s van ver¬ 
schillende ontwikkelaars mogelijk te ma¬ 
ken. Interfacing van IFF naar t>v. de 
NAPLPS videotex standaard is dok moge¬ 
lijk. 

Een andere ontwikkeling is de Expansion 
Slot Configuration specificatie, waardoor 
de verschillende externe apparatuur en 
uitbreidingskaarten op de 68000 bus van 
de Amiga uitwisselbaar blijven. 

Informatie-pool 

De software-ontwerpers, die zich bezig¬ 
houden met de Amiga, kunnen zich via het 
Amiga Information Network on-line op de 
hoogte stellen van de laatste ontwikkelin¬ 
gen. Er bevindt zich daarion o.a. een elec- 
tronische bibliotheek met Amiga docu¬ 
mentatie, product informatie en ”Bug” rap¬ 
porten. Informatie : Paul Goheen CBM 
Westchester Pa. USA of Terry Ishida bij 
CBM-Amiga, 983 University Avenue, Los 
Gatos CA 95030 USA. 

Zakelijke software 

Wil de Amiga enige kans maken om ook bij 
de grotere bedrijven in de gunst te komen, 
dan is naast de beloofde, maar nog niet 
getoonde MS-DOS optie vooral de soft¬ 
ware van belang. Er beginnen nu ook 
spreadsheet, database, "desktop acceso- 
ries” zoals agenda en notitieblok, en com- 
municatie-pakketten te verschijnen. Hier¬ 
bij wordt ook al gebruik gemaakt van de 


multi-tasking mogelijkheden van de Ami¬ 
ga, zoals bij Maxidesk en MaxiComm van 
Maxisoft, pakketten die minder dan 200 
gulden per stuk kosten. Ook boekhoud- 
software, zoals de Rags to Riches serie 
van Chang Labs. is nu te koop. Voor 
Europa zal er overigens wel andere boek- 
houdsoftware moeten komen. 


Ontwikkelsoftware 

Van Lattice, een bedrijf dat erg bekend is 
door zijn ”C” en Unix software, zijn er nu 
ook Utilities voor de Amiga. Sommige van¬ 
uit de Mac overgezet, zoals MaxLibrary, 
maar ook Panel, een applicatie-generator 
voor ”C”, en Lattice Make utility en Text 
Utilities voor Unix. • 
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Er zijn natuurlijk toepassingen, waar je met een paar tientjes aan software niet mee uit 
de voeten kunt en ook een 64 of 128 niet groot genoeg is om echt alles te kunnen doen. 
Dan grijpt men al snel naar de PC-10 of andere PC’s. We belichten hier zo’n 
programma, omdat u dan ook kunt zien, wat de toepassingsbreedte is, wat u mag 
verwachten van een programma, en waarom dergelijke "verticale” software zo 
belangrijk is. 


stiMs 


Bouwcalc 


Voor de PC-10 en IBM-compatibele mi¬ 
cro’s is er een speciaal calcuiatiepro- 
gramma voor de bouwwereld, dus voor 
aannemers, wegenbouwers, construc¬ 
tiebedrijven en dergelijke. De werkwijze 
van Bouwcalc komt overeen met die 
van het handmatige begroten. 

Het staat er zo simpel, de methodiek komt 
overeen met wat gebruikelijk is in de bouw. 
Maar hiermee raken we meteen de wezen¬ 
lijke problematiek van een gericht of verti¬ 
caal programma. Het is er niet voor de 
computerspecialist of zelfs hobbyist, het is 
er voor de gebruiker. Dat is een calculator 
of werkvoorbereider, iemand die helemaal 
niets van computers weet, laat staan wil 
weten. Het ding moet hem helpen bij zijn 
werk, liefst zo veel mogelijk volgens de 
hem bekende werkwijze, dan hoeft hij of zij 
minder te leren, maakt minder fouten en is 
sneller operationeel. Want even iemand 
twee weken naar een cursus sturen, dat 
kost minimaal een paar duizend gulden 
alleen al aan salaris. Dan wil je als koper 
van een programma dus best wat meer 
uitgeven voor een programma, dat sneller 
en met minimale opleiding door de men¬ 
sen, die er nu werken, gebruikt kan 
worden. 
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Staten 

Terug naar het programma, dat past zich 
dus aan aan wat men gewoon is, de uit- 
trekstaten. Staten zijn lijsten, dus databa¬ 
se- structuren in computertermen. Nadat 
een uittrekstaat is gemaakt, worden de 
gegevens daarvan ingevoerd in de compu¬ 
ter. Doordat de uittrekstaat is gebaseerd 
op het activiteitenbestand, verloopt deze 
invoer zeer vlot. Na de verwerking wordt, 
ter controle, een zgn. interne versie van de 
begroting gedraaid, waarop alle gegevens 
zijn weergegeven. Na de controle en 
event. bijsturing (zeer snel d.m.v. nummer- 
codes) kan tenslotte een externe versie 
(dus voor de klant, die eventueel de op¬ 
dracht gaat verlenen aan het bouwbedrijf) 
worden uitgeprint, welke zeer overzichte¬ 
lijk voldoende gegevens bevat voor de 
'buitenwereld’ i.c. cliënten, maar de voor 
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het bouwbedrijf belangrijke, onderliggen¬ 
de gegevens niet bloot geeft. De omvang 
van de benodigde bestanden is bepalend 
voor de totale verwerkingssnelheid van het 
programma. De bestanden worden door 
het systeem gedefinieerd en tevens wordt 
de benodigde capaciteit door het systeem 
zelf aangepast. Maximaal kunnen 
ca. 130.000 activiteiten in het activiteiten¬ 
bestand worden opgeslagen, verdeeld in 
ten hoogste 99 hoofdstukken, maar dan is 
men wel aan een harde disk micro zoals de 
PC-20 toe. 

Bouwcalc. 

Het pakket Bouwcalc kan in vijf modules 
geleverd worden. 

Bouwcalc I is het standaardprogramma, 
waarbij u zelf uw basisgegevens (omschrij¬ 
ving, normen, materiaalprijzen e.d.) moet 
invoeren, aan de hand waarvan u vervol¬ 
gens een begroting kunt maken. Deze 
gegevensverzameling (activiteitenbe¬ 
stand) zal in de loop van de tijd groeien, 
zodat u steeds nauwkeuriger en sneller 
zult gaan begroten. 

De modules Bouwcalc II t/m V kunnen elk 
afzonderlijk als aanvulling op Bouwcalc I 
aangeschaft worden. 

Bouwcalc II bevat het bovengenoemde 
basisbestand, gevuld volgens de codering 
van het "Standaard Referentiebestek voor 
de Woningbouw” (SRW), met bijbehoren¬ 
de normen en prijzen. U kunt dus nu direct 
aan de slag. Afhankelijk van de apparatuur 
is er nog veel ruimte (tot ca. 130.000 
activiteiten) over om eigen gegevens aan 
dit bestand toe te voegen. Ook bent u bij 
het begroten niet gebonden aan de gege¬ 
vens, die in dit bestand staan en kunt u zo 
vaak u maar wenst ieder gegeven in dit 
bestand wijzigen. 

Bouwcalc III beschikt over een nacalcula- 
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tie. Hiermee kunt u op ieder gewenst ogen¬ 
blik een overzicht verkrijgen van de werke¬ 
lijke gemaakte kosten -uitgesplitst naar 
lonen en materialen- versus de begrote 
kosten. De computer splitst, sorteert en 
sommeert alle bedragen op de door u 
gewenste manier. Ook kunt u in een vroeg¬ 
tijdig stadium van de bouw een prognose 
laten uitrekenen van de te verwachten 
bouwkosten. 

Bouwcalc IV beschikt over een apart mate¬ 
rialenbestand. Door middel van een sorte¬ 
ring naar materiaal-code kan m.b.v. de 
computer een kostenoverzicht verkregen 
worden van de totale hoeveelheid van een 
soort toegepast materiaal (bv. steen). Bo¬ 
vendien worden de prijsmutaties per ma¬ 
teriaal code doorgevoerd, zodat u deze 
slechts eenmalig hoeft in te voeren. Vol¬ 
gens de materialen staat n.a.v. de begro¬ 
ting kunt u een overzicht krijgen van de 
totale hoeveelheid per materiaal. 
Bouwcalc V beschikt over een elementbe- 
groting. U kunt zelf de samenstelling van 
de elementen bepalen en per onderdeel 
van elk element zijn alle mutaties mogelijk. 

De prijs 

Uit het voorgaande wordt wel duidelijk, dat 
een dergelijk pakket nogal wat kan en 
biedt. Voor de gebruiker telt in eerste 
instantie de verhoogde snelheid, waarmee 
hij offertes kan maken en het werk begelei¬ 
den. Dat vertaalt zich weer in loonkosten 
van de calculatie-afdeling en daar reken je 
ook in tienduizenden. In dat verband is de 
prijs van een BouwCalc basisprogramma 
van ƒ4.500,- ex Btw natuurlijk verklaar¬ 
baar, bovendien is de markt voor dit soort 
pakketten lang niet zo groot als van bij¬ 
voorbeeld een tekstpakket. De prijs van 
een extra module ligt rond de ƒ 1.000, = . 
Informatie: ABP 071-171041 
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Het MS/DOS Operating 
Systeem 


D e hardware waaruit een compu¬ 
ter is opgebouwd is weinig 
waard, zonder de computerin- 
structies die aan de hardware 
laat weten wat er moet gebeu¬ 
ren. Daarom hield de ontwikkeling van 
software, de hele informatica-ge- 
schiedenis door immer gelijke tred met 
de hardware-evolutie. De één kan een¬ 
voudigweg niet functioneren zonder de 
ander. De strijdvraag blijft desondanks 
bestaan welke van de twee nu het be¬ 
langrijkst is. Een vraag waarop u ook 
hier geen antwoord zult vinden. Wel 
wordt een duidelijker beeld geschapen 
van de functies die het operating sy¬ 
steem van Microsoft, MSDOS heeft in 
de PC-hardware. 

Het operating systeem van de moderne, 
veel gebruikte business computer, ofwel 
de PC’s van IBM en allerlei clones, waar¬ 
onder de Commodore PC een goede posi¬ 
tie inneemt, is vele malen meer dan een 
hulpmiddel om bestanden te copieëren, te 
wissen of een nieuwe directory aan te 
maken. Het MSDOS Operating Systeem is 
feitelijk een hele, weldoordachte, serie van 
gebruiksroutines, die niet alleen door de 
gebruiker vanaf het toetsenbord kunnen 
worden aangeroepen, maar ook door na¬ 
genoeg alle PC-software wordt gebruikt. 
De nadruk van het Operating Systeem ligt 
bij het in goede banen leiden van l/O 
functies. De invoer vanaf de diskette en 
Winchesterdrive en de uitvoer naar het 
scherm, de printer of een ander terminal is 
geheel in handen van het Operating Sys¬ 
tem. De beschrijving van alle beschikbare 
mogelijkheden past niet in het concept van 
dit artikel, daarom zullen we volstaan met 
een beschrijving van het systeem in alge- 
men zin. 

MSDOS 

Het 'programma’ MSDOS werd door toe¬ 
gewijde en ongetwijfeld intelligente soft- 
warejongens tot stand gebracht in samen¬ 
werking met de hardware-ontwerpers. 
IBM is ook hier een pionier geweest, zoals 
we dat inmiddels gewend waren van alle 
voorgaande markleidende systemen, zo¬ 
als b.v. CP/M. De intieme relatie tussen 
soft- en hard-ware ontwikkeling was zon¬ 
der meer nodig, omdat de uiteindelijke 
controle van de hardware in handen is van 
de programmeur. Als er een regel tekst van 


het toetsenbord naar de printer moet, dan 
zijn daar nogal wat software-opdrachten 
voor nodig. Hetzelfde geldt natuurlijk voor 
data-overdracht van disk naar geheugen 
en vise versa. Daarvoor is een goed inzicht 
nodig in de eigenaardigheden van de di¬ 
verse randapparaten. 

En net zoals het gaat met de programmeur 
die z’n eerste stappen zet met een Basic- 
handboek op z’n bureau, is ook MSDOS 
tot stand gekomen. Het idee, om een ’16- 
bits’machine op de markt te brengen, is 
zeker niet zonder een keiharde ontwikkel- 
fase verlopen. De ziel van de P.C. ligt in 
een zwembad van zweet en teleurstellin¬ 
gen, maar de resultaten zijn nu al een paar 
jaar marktbeheersend. 

Toepassingen 

Zodra de eerste routines waren uitgekris¬ 
talliseerd, kwamen de applicaties, in de 
vorm van database-verwerking en tekst¬ 
programma’s, die alle een complexe een¬ 
heid van opdrachten en MSDOS instruc¬ 
ties inhielden. Dat was het moment waar¬ 
op ook de gebruiker ten volle met de PC- 
serie kon gaan werken. Daarbij was een 
eerste vereiste, dat de gebruiker zich perti¬ 
nent geen zorgen meer moest maken over 
de manier waarop de data werd verwerkt, 
maar zich alleen hoefde te bemoeien met 
de applicatie en de bovenste laag van de 
hele software-ring die inmiddels rond de 
snelle 8086/8088 processor was gelegd. 
Het uitvoeren van de programmatuur ligt 
verborgen in de systeemringen en deze 
hebben alle een eigen taak om het de 
eindgebruiker mogelijk te maken de meest 
fantastische dingen te kunnen doen met 
zijn computer. 

Want naast de bekende MSDOS toetsen- 
bordopdrachten als DIR, DATE, FORMAT, 
DISKCOPY en noem maar op, wordt door 
alle software die als applicatie voor de 16- 
bitter is geschreven, een veelvuldig ge¬ 
bruik gemaakt van de computer-code die 
samen het Microsoft Disk Operating Sys¬ 
tem vormen. 

Het is een immer verbazingwekkende er¬ 
varing, iedere keer dat er weer een nieuw 
ontwikkelde software-applicatie op m’n 
bureau belandt, want steeds wordt er kans 
gezien nog mooier en fantastischer met 
het Operating Systeem om te springen. 
Toen we een jaar geleden nog opkeken 
tegen de mogelijkheden die Lotus en 
Symphony boden, wisten we natuurlijk 



nog niets van de Windows, interrupt-soft- 
ware en andere toepassingen die we nu in 
1986 voor een redelijk bedrag tot ons 
eigendom kunnen maken. 

Ontwikkeling 

En altijd blijft daar maar het operating 
systeem MSDOS dat de drijvende kracht 
vormt voor deze ongedachte nieuwighe¬ 
den. De applicaties vormen als het ware 
een ring om de gebruiker te beschermen 
voor de complexe handelingen die de PC 
intern moet uitvoeren om onze software 
droom te kunnen realiseren. Ook MSDOS 
is in deze ontwikkeling niet stil blijven 
staan. Gaandeweg kwamen er nieuwere 
versies, en naar verluid is er inmiddels 
bijna een versie 4.0, maar dat ligt nog in de 
toekomst. De versies 3.0 en 3.1 zijn voor 
de AT-gebruikers inmiddels gemeen goed, 
hoewel het merendeel nog altijd kan vol¬ 
staan met MSDOS 2.0 of 2.2. 

De hele ontwikkeling van dit succesvolle 
operating systeem is voornamenlijk te 
danken aan het feit, dat er al snel na de 
lancering van de PC-achtigen werd gecon¬ 
stateerd, dat bijna alle software gebruik 
maakte van min of meer gelijkluidende 
routines. Dit resulteerde in een groot aan¬ 
tal vastgestelde DOS-functies, die op een 
gestructureerde manier door de software 
(en dus ook door de doe-het-zelf-program- 
meur) kunnen worden aangeroepen en 
gebruikt. De taak die ieder van deze func¬ 
ties heeft, loopt uiteen van het inlezen van 
een ’character’ van ’t toetsenbord, langs 
allerlei min of meer ingewikkelde routines 
om te kunnen manipuleren met datum, tijd 
en strings tot de complexe (nieuwere) 
functies die alles te maken hebben met 
een bijzonder geavanceerde file-handling. 
Zeker bij het ontwikkelen van de directory- 
tree en het daaraan verbonden file-pad 
(PATH) is het een genot om over deze 
ingebouwde MSDOS-software te be¬ 
schikken. 
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Deze keer nemen we in de serie over machinetaal van Sjoerd Bakker VIC’s interrupt- 
mogelijkheden onder de loep. Daarna vervolgen we de analyse van het Plot- 
programma. We zullen dan zien hoe je x-y-coordinaten kunt omzetten in punten op het 
beeldscherm. 



Programmeren in 
machinetaal 


Aflevering 1 9 



VIC Interrupts. 


E ven het geheugen opfrissen. Wat 
was ook alweer een interrupt? 
Een interrupt is een geforceerde 
onderbreking van een lopend ma- 
chinetaalprogramma. 
Verschillende kondities in de computer 
kunnen zo’n onderbreking tot gevolg heb¬ 
ben. Het geijkte voorbeeld is de timer- 
interrupt in Basic-mode. Elke 1/60 secon¬ 
de wordt het lopende programma onder¬ 
broken om te controleren of er ook toetsen 
zijn ingedrukt. In dit geval veroorzaakt het 
aflopen van de timer (eierwekker) telkens 
de interrupt. Zie voor een uitvoerige be¬ 
handeling van interrupts Commodore Info 
jaargang 2 nr. 6. 

Video Chip 

Met de VIC chip wordt de besturing van 
het beeld in de 64 geregeld. VIC heeft de 
mogelijkheid om 4 verschillende IRQ’s te 
geven. IRQ’s veroorzaken een indirekte 
sprong naar de vector op $0314/$0315. Je 
kunt ze met de instructie SEI bij de proces¬ 
sor verbieden. Register $D01A wordt ge¬ 
bruikt om de IRQ’s bij VIC toe te staan, dan 
wel te verbieden. Bit 0 heeft betrekking op 
Raster interrupts, bit 1 op Sprite-Data in¬ 
terrupts, bit 2 op Sprite- Sprite interrupts 
en bit 3 op Lichtpen interrupts. Je verbiedt 
een interrupt door het betreffende bit 0 te 
maken en je staat hem toe door het bit 1 te 
maken. In register $D019 kun je zien of er 
een interrupt is opgetreden. Als een bit 0 is, 
dan betekent dit dat er geen interrupt is. 


VIC INTERRUFTREGISTERS | 


OPGETREDEN: 

I TOEGESTAAN: 


SSD019 

1 SD01A 

BIT 



0 

RASTER 


1 

SPRITE-DATA 


2 

SPRITE-SPRITE 

3 

LICHTPEN 


7 

TOEGESTANE 

INTERRUPT 


OPGETREDEN 

($D019 ï 


Zijn nu een bit van register $D01A (inter¬ 
rupt toegestaan) en een overeenkomstig 
bit van register $D019 (interrupt opgetre¬ 
den) beide 1, dan wordt bit 7 van register 
$D019 automatisch 1. Hierdoor wordt er 
een signaal over de IRQ-lijn naar de pro¬ 
cessor gestuurd, waarna het lopende pro¬ 
gramma wordt onderbroken, als tenminste 
niet alle IRQ’s met SEI zijn verboden. Er 
volgt een indirekte sprong via $0314/ 
$0315 naar de interruptroutine. Deze moet 
er o.a. voor zorgen dat het betreffende bit 
van register $D019 weer 0 wordt gemaakt, 
want anders blijven we voortdurend IRQ’s 
krijgen. Dat doen we door een 1 naar het 
bit te schrijven. Naar de andere bits schrij¬ 
ven we nullen, waardoor hun waarde niet 
verandert. We beëindigen de routine met 
de instructie RTI, waarmee we weer terug¬ 
keren naar het hoofdprogramma. We zul¬ 
len de interruptmogelijkheden een voor 
een behandelen, en beginnen bij de 
Sprites. 


Prioriteiten 

Voordat we met de Sprite interrupts begin¬ 
nen moeten we het eerst hebben over iets 
wat ermee samenhangt: de prioriteiten 
(voorrang). Wat krijgt voorrang op het 
beeld, welk stukje is het belangrijkste. Dus 
welk stukje beeld schuift voor of achter 
een ander stukje. Afgezien van Sprites 
kunnen er namelijk ook andere voorstellin¬ 
gen op het beeldscherm staan. Een gra¬ 
fisch plaatje bijvoorbeeld. We zagen al dat 
zo’n plaatje is opgebouwd uit nullen en 
enen, die respectievelijk betrekking heb¬ 
ben op de achter- en de voorgrondkleur. 
Nu kun je zelf bepalen of een Sprite onder 
de enen door, dan wel over de enen heen 
gaat. De bits van register $D01 B bepalen 
of de Sprite (1) of het plaatje (0) zichtbaar 
is. Bits 0-7 hebben als gewoonlijk weer 
betrekking op Sprites 0-7. Als twee of 
meer Sprites elkaar overlappen is het heel 
eenvoudig. De sprite met het laagste num¬ 
mer is dan zichtbaar. Zoals vaak in deze 
serie raad ik je aan om zelf wat met de 
verschillende mogelijkheden te experi¬ 
menteren. Pas dan wordt het effect goed 
duidelijk. 

Sprite-data interrupts 

Als een Sprite tegen een 1 van het grafi¬ 
sche plaatje of tekstscherm "botst” kan dit 
een interrupt veroorzaken. Het is handig 
om te weten welke Sprite verantwoordelijk 
was voor de interrupt en daar is dan ook 
weer een speciaal register voor. De bits 
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van register $D01 F geven aan welke Sprite 
botste. Bits 0-7 hebben betrekking op 
Sprites 0-7. Een 1 betekent een botsing; 
een 0 geen botsing. Door $D01F te lezen 
worden alle bits ervan weer 0. 

Een opmerking: in MCM (zie de vorige 
afleveringen) wordt de ”01”-kleur in dit 
verband beschouwd als zijnde transpa¬ 
rant. Als je op deze kleur stuit, kan er dus 
geen interrupt optreden. 

Sprite-sprite interrupts 

Register $D01 E registreert botsingen die 
Sprites met elkaar maken. Van de betrok¬ 
ken Sprites worden de bits gezet. Verder 
werkt dit register hetzelfde als register 
$D01 F. Wat kun je nu in de praktijk met die 
botsinterrupts doen? Een voorbeeld. Je 
maakt een spel, waarbij het de bedoeling is 
dat de held, Edje, zo veel mogelijk goud¬ 
staven verzamelt. Edje wordt Sprite 0, en 
de goudstaven Sprites 1 -7. Het hoofdpro¬ 
gramma bestaat eruit dat een joy- 
stickpoort wordt gelezen, waarna we Edje 
eventueel laten bewegen over het scherm. 
Verder wisselen we af en toe van scherm 
en laten we constant een lekker stukje 
dixieland horen. Als Edje nu na vele avon¬ 
turen tegen een goudstaaf oploopt volgt er 
een interrupt. Het hoofdprogramma wordt 
onderbroken en we springen naar een 
routine die een belletje doet rinkelen, de 
goudstaaf wegneemt en de score ver¬ 
hoogt. Daarna springen we weer terug 
naar het hoofdprogramma. Vervolgens 
schudt Edje nog vele bijstandsmoeders 
van zich af, wint daardoor alle goudstaven 
en wordt als beloning onderdirekteur van 
de BV Nederland. Niet zo’n leuk spel mis¬ 
schien, maar zo gaat het in de praktijk. 

Raster Interrupts 

Bij het Spriteprogramma van de vorige 
aflevering zal het wellicht zijn opgevallen 
dat de Sprite een wat onrustige indruk 
maakte. Hij leek niet helemaal ”in zijn vorm 
te passen": de omlijning varieerde af en 
toe iets. Dat komt omdat we geen rekening 
hebben gehouden met de plaats van het 
z.g.n. beeldschermraster tijdens het be¬ 
wegen van de Sprite. 

Een niet bewegend computerbeeld lijkt zo 
op het oog zeer stabiel te zijn. Toch wordt 
het 50 keer per seconde opneiuw samen¬ 
gesteld. Maar omdat de informatie continu 
hetzelfde blijft, merkje daar natuurlijk niets 
van. Het schrijven van het beeld begint 
boven in het scherm en eindigt onderaan. 
Elk puntje wordt steeds opnieuw ververst. 
Een horizontale rij puntjes noemen we een 
raster. Die rasters omvatten ook de randen 
van het beeldscherm. 

De onrust van de Sprite ontstond doordat 
we hem soms verplaatsten op het mo¬ 
ment, dat hij weer opnieuw werd samen¬ 
gesteld. De bovenkant werd nog op de 


oude plaats weergegeven, maar de onder¬ 
kant werd een stukje verder neergezet. 
Gelukkig kent VIC de mogelijkheid om te 
achterhalen welk raster op een bepaald 
moment wordt geschreven. Daartoe zijn 
ze genummerd van $000-$137. De op het 
scherm zichtbare rasters (binnen de on¬ 
der- en bovenrand) lopen van $032-$0F9. 
Register $D011 en $D012 bevatten het 
nummer van het raster dat op een bepaald 

r*————— 11 

5 FOK X-36864 TO X+56 : READ Y 

6 POKE X,Y: NEXT: SYS 36864 

10 DATA 120, 173, 18,208,201,0,208,249 
20 DATA44, 17,208,48,244, 162,8, 142 
30 DATA32,208,173,18,208,201,50,208 
40 DATA249,162,2,142,32,208,173,18 
50 DATA208,201,128,208,249,162,l,142 
60 DATA32,208,173,18,208,201,208,208 
70 DATA249,162,6,142,32,208,76,1,144 


moment wordt geschreven. Van register 
$D011 is alleen bit 7 van belang: dit is het 
MSB van het rasternummer. Als je met 
rasterinterrupts wilt werken moet je een 
rasternummer in deze registers schrijven. 
Op het moment dat die raster aan de beurt 
is vindt dan de interrupt plaats. Bijgaand 
demo-programma zet de Nederlandse 
vlag, d.m.v. het opvragen van het raster¬ 
nummer, in de schermranden. 

In de praktijk kun je d.m.v. de rasterpositie 


bijvoorbeeld Sprites storingsvrij over het 
scherm laten bewegen. Ook kun je dan 
gaan scrollen: het scherm in zijn totaal 
laten bewegen. Dit gebeurt o.a. bij het 
listen van programma’s. Een speciale 
vorm van scrollen is het "smooth scrollen”. 
Het betekent dat je het scherm een puntje 
in de x- of y-richting kunt laten bewegen. 
Je hoeft hierbij geen data te verplaatsen: 
VIC voert deze taak automatisch uit. De 
laagste drie bits van register $D011 zijn 
voor smooth scrollen in de y-richting en de 
laagste drie bits van register $D016 zijn 
voor smooth scrollen in de x-richting 
Drie bits kunnen 8 verschillende waardes 
aannemen, en je kunt dus maximaal 8 
puntjes horizontaal of vertikaal scrollen. 
Daarna moet je het hele scherm verplaat¬ 
sen. De oplopende waardes 0-7 in deze 
register hebben respectievelijk betrekking 
op verplaatsing van boven naar beneden 
en van links naar rechts. Je hoeft voor een 
glad effect trouwens niet met één puntje 
tegelijk te scrollen. Per 4 gaat het ook nog 
aardig gestroomlijnd, en dat werkt natuur¬ 
lijk een stuk sneller. Om de snelheid nog 
meer op te voeren kun je je hires-plaatjes 
samenstellen met eigen grafische karak¬ 
ters (zie jaargang 2 nr. 9). Zo hoef je maar 
1000 i.p.v. 8000 Bytes te verplaatsen, en 
dat kan net het verschil uitmaken tussen 
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een flitsend en een niet zo flitsend pro¬ 
gramma. Let er wel steeds op dat je het 
raster buiten beeld houdt. 

Een ander gebruik van rasterinterrupts is 
de ”splitscreen"-mogelijkheid. Dat wil zeg¬ 
gen dat je het scherm bijvoorbeeld op¬ 
splitst in een grafisch en een tekstgedeel¬ 
te. Als het raster op een bepaalde hoogte 
is, spring je van grafische mode naar tekst- 
mode. 

Lichtpen interrupts 

De lichtpen stop je in joystick-poort 1. VIC 
registreert nu 50 keer per seconde op 
welke plaats je de pen tegen het scherm 
houdt. Hij zet de coördinaten telkens in de 
regisers $D013 (x) en $D014 (y). De hori¬ 
zontale resolutie neemt hierbij met de helft 
af: het geregistreerde gebiedje is 2 bij 1 
puntjes groot. Ook kan er op het moment 
dat de raster de plaats van de lichtpen 
passeert een interrupt worden gegeven. 
Hierdoor is het mogelijk om tekeningen 
direkt op het scherm te maken. Lichtpen- 
technieken is weer echt iets voor de spe¬ 
cialisten. We zullen er hier dan ook niet 
verder op ingaan. 

Plotprogramma 

Analyse 

We vervolgen nu de analyse van het PLOT- 
programma. Deze keer behandelen we de 
routine die x-y-coordinaten omzet in plot- 
punten op het beeldscherm. 

Als we Unplotten zetten we allereerst een 
1 in geheugenplaats $0A en bij Plotten 
wordt het een 0. Zo weten we aan het eind 
of we het punt aan of uit moeten zetten en 
kunnen we voor Plotten en Unplotten de¬ 
zelfde omzet-routine gebruiken. 
Vervolgens springen we naar de Basic- 
subroutine $B7EB. Dit is de routine die 
normaal gesproken ASCII-cijfers uit de 
POKE-opdracht omzet in tweetallige waar¬ 
des. In $14/$15 komt dan het adres van de 
te Poken geheugenplaats te staan, en het 
X-register bevat de waarde die daar moet 
worden neergezet. Wij gebruiken echter 
de inhoud van $14/$15 als x- en het X- 
register als y-coordinaat. 

Commando’s 

Test controleert of de x- en y-waardes niet 
groter zijn dan toegestaan (resp. 319 en 
199). Bij overschrijding wordt er met een 
Syntax-error teruggesprongen naar Basic. 
Dan begint de omzetting. Basis zet het 
basisadres van het grafisch scherm, 
$E000, in $FB/$FC. 

De routines Regel, Vak en Rij 8 hebben 
gemeen, dat op $FD/$FE een waarde komt 
te staan, die opgeteld moet worden bij het 
basisadres. Het aantal keren dat er opge¬ 


teld moet worden, wordt aangegeven met 
de inhoud van het Y-register. 

De subroutine Sub zorgt voor het eigenlij¬ 
ke optellen. 

Regel berekent de schermregel waarin 
geplot zal gaan worden. 

Vak berekent van die regel het vakje (8 bij 8 
puntjes). 

Rij 8 berekent welke horizontale rij van 8 
puntjes in dat vakje geadresseerd wordt. 
Op welke manier dit gebeurt mag de lezer 
uitvinden. We hebben nu het adres waarin 
geplot moet worden. 

Punt berekent dan welke van de 8 bits we 
moeten hebben. 

Zet controleert vervolgens eerst of er ge¬ 
plot of ge-unplot moet worden, en zet dan 
het betreffende punt aan of uit. 

Dat was het dan wat betreft de VIC-chip, 
en ook wat betreft de Commodore-64 
chips in het algemeen. Zoals je misschien 
al gemerkt zult hebben ben ik persoonlijk 
iemand voor wie de dichtheid informatie 


per vierkante centimeter niet groot genoeg 
kan zijn. 

Er zijn echter lezers die vinden dat het 
allemaal te snel gaat. Hen zal ik in de 
komende maanden wat tegemoet probe¬ 
ren te komen. Bedenk echter wel dat ma¬ 
chinetaal sowieso moeilijk is. Je moet er 
behoorlijk wat tijd in steken om het redelijk 
onder de knie te krijgen, en zelfs dan is het 
nog een grote stap naar programma’s a la 
John Vanderaart. Trouwens, als een cur¬ 
sus heb ik deze serie nooit echt bedoeld, 
het is meer een reeks ingangen tot de 
machinetaal geworden. Voor meningen 
over deze serie sta ik altijd open. Stuur me 
dus rustig je opmerkingen of suggesties. 
"Programmeren in machinetaal” is er ten¬ 
slotte voor jou! 

Sjoerd Bakker 
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Listings vervolg van pag. 38 


Figuren 64 


Als u dit programma van C.W. Jansen uit Nijmegen weet te 
doorgronden dan kunt u met die kennis zelf een ontwerp maken. 
Het programma, dat volledig in basic geschreven is, tekent een 
figuur op het scherm. Dit lijkt misschien nutteloos, maar een 
dergelijk ontwerp kan een fraaie titelpagina voor een van uw 
eigen programma’s vormen. En een titelpagina is het visitekaar¬ 
tje van een professioneel programma. 


1 

ram figuren 


2 

rem door c.w. 1aneen 

3 

rem uit niimegen 


4 

rem 


10 

printchrftl47) irem 
n i tor 

zwart-wit mo 

20 

poke53280,Bipoke53281,0:poke646 


, 15in* = "figuur" 


30 

goto60 


40 

print"CHQME3"iify<>0thenpoke214 


,y-l:print:poke211, 

x i return 

50 

end 


60 

clricc=lixf“ 0iyf=- 
0 

1 l x g = ~1iyg = 

70 

x0=19:y0»10:w»="V“: 
= 1 :x1 = 14igosub210 

k=l■ul= 1iuf 

80 

cl r s cc = 0s x-f = 1: y-f = 

1 

0 1 x g = 0:yg = - 

90 

x0 = 20iy0=10iw*="V" : 
=-liyu= 5:gosub2L0 

k = 11 r1=291 rf 

100 

clr:cc=0:xf=-l:yf= 

1 

0 :xg = 0:yg= 

110 

x0=>19sy0=ll:w$ = "V" i 
= 1 Iyd=16:gosub210 

k= 1:11 = 10:lf 

120 

c1r:cc = 1:xf = 0:yf = 

0 

x0=20ty0='lliw$=“V"i 

1 : xg= 1:yg = 

130 

k=lidl=20:df 

=-l:xr=25:gosub210 

140 

c1rscc=lixf= 0:yf=- 
0 

l:xg= 1 : yg = 

150 

X0»lèiy0=14iw*="+"i 
r=24:igoeub210 

k=ll:ul= 6:x 

160 

c1r:cc=1:xf= 0iyf=- 
0 

1 : x g=-1:yg = 

170 

x0-Z2iy0»13iw*=>"V" s 
1=16::gosub210 

k=15:ul= 7:x 

180 

clr:cc=l:xf= 0:yf=- 
0 

1 Ix g= 1:yg = 

190 

x0=19: y0-l 1iw* = " "■ 

r = 21 1 igosub210 

k=15:ul= 9:x 

200 

end 


210 

x1= x 0■y1=y0 


220 

x=xl:y=yl:gosub40,x' 

-y routine 

230 

poke646,k 


240 

printwt 


250 

ifcc=0thengoto270 


260 

ifcc=lthengoto2S0 


270 

x1=x1+xf:ifx1 = 1 1 or 
310 

x1=r1thengoto 

280 

y 1 =y1 + yf■ify1=u1 or 
300 

yl=dlthengoto 

290 

goto220 


300 

xl=xl+xgiyl»y0igoto320 

310 

yl=yl+yg:xl=x0:goto: 

320 

320 

ifxl=xl or xl=xr thi 

engoto360 

330 

ifyl=yu or yl=yd thi 

engoto360 

340 

11 = 1 l + lf:rl=rl+rf:u 
1 +df 

1 =u1+uf:d1=d 

350 

goto220 


36@ 

return 
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20 

regel 

40 

92 
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250 
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regel 

50 
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regel 

260 
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60 

131 

regel 

270 

187 

regel 

70 

13 

regel 

280 

186 

regel 

80 

215 

regel 

290 

29 

regel 

90 

190 

regel 

300 

100 

regel 

100 

215 

regel 

310 

101 

regel 

110 

39 

regel 

320 

200 

regel 

120 

45 

regel 

330 

199 

regel 

130 

200 

regel 

340 

99 

regel 

140 

216 

regel 

350 

29 

regel 

150 

210 

regel 

360 

142 

regel 

160 

131 
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170 
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tellen 


ABONNEMENTEN 
OUDE NUMMERS 


Abonnementen kosten ƒ 55,- en voor een vol 
jaar Commodore-lnfo (10 nummers) is het 
verreweg het gemakkelijkste, wanneer u dat 
bedrag aan ons overmaakt op giro 1585491 tnv. 
SAC Blaricum of op onze bank in België BBL 
nr. 310050602562 

OUDE NUMMERS 

Reeds verschenen nummers zijn na te bestellen. 
Maar, helaas, NIET per brief, kaart of telefonisch. 
We leveren die oude nummers alleen bij 
vooruitbetaling op onze giro 1585491. 

De prijs is ƒ 6,75 per nummer 
(dus aangeven welk nummer). 


*** EINDE LISTING *** 


Van de eerste jaargang, 1984, zijn alleen nog de 
nummers 2, 4 en 5 beschikbaar. In dat jaar zijn 
overigens maar vijf nummers verschenen. 
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Kubus 64 


Heeft u zich ooit, in de tijd dat deze een rage waren, zo’n Rubik’s 
Kubus aangeschaft? Na weken draaien hem niet goed gekre¬ 
gen, en ver weg opgeborgen? Dan hebben we hier iets voor uw 
inmiddels weer tot rust gekomen zenuwen. Een tweedimensio¬ 
nale kubus. De bedoeling is simpel, u schuift d.m.v. de cijfertoet- 
sen de rijen net zolang tot u de horizontale balken weer net zo op 
het scherm heeft staan als ze waren voor de computer ze door 
elkaar schuift. Onze sympathie en medeleven gaan naar u uit, 
want dit is niet eenvoudig. 


1 rem kubus 

2 rem door edward de ruiter 

3 rem uit riiswiik 

4 rem 

10 print"CCLR—HOME3":poke53280,0:poke 
53281,0:poke646,4:pake36B79,59 
20 dimaX <5,5) ! fari=0to4ireadaX:-for 
i=0to4:aX(i, j )**aXinexti , i 
30 data28,5,31,158,30 
40 goto200 
50 rem scherm 

60 print"CCLR-HOME3 C10xrechts3UC6C 
C7CC8CC9CC0CI" 

70 ■fori=5tolstep-l:printspc(10> | "B" 

S spc <15>i "B" 

80 a*=right*(str*(i),1)iprintspc<9 
> ;at; "B " ;spc(15>| "B";a* 

90 printspc(10);" B " ; s p c < 15)j"B" 


JC6CC7CC8CC9CC0CK" 1 print"C2xneer 3 
CRVS-aan3oCRVS-uit3pnieuw" sprint 
"Cneer3CRVS-aan3sCRVS-uit3stopp 
en 

1 10 pr int ” CHOME3 " ; 1 -f or i =0to4 1 f or i = 1 
to3:print:printspc(10)“[RVS-aan3 
Crechts3"j s-fork=0to4 
120 printchr*(aX(i,k))j"C3xspatie3" 

Iinextk,j,1 
130 return 

140 rem**verdraaien*# 

150 fori*5tolstep-liaX(a,i ) =>aX ( a ,i - 
1>:nex t 

160 aX(a, 0 )= aX<a,5 )1 return 
170 tar i=5tolstep-l 1 aX(i,a)=aX(i-1, 
a) :nex t 

180 aX(0,a)=aX<5,a)>return 
190 rem hoo-fdprog. 

200 gosubé>0j -forw = 0to20« a=int (5*rnd ( 

1))ionl+2trnd(l)gosubl50,170:gosub 
110 1 nex t m 

210 geta*: i-f a*= "s"thengosub27@: gosub 
270:gosub270:sys49152 
220 gosub380:a=val<a«):ifa*="0"then 
a= 1 0 : 

230 i-f a = 0then240 

240 ifa>5thena=a-6:gosubl70:goto260 

250 a=5-a:gosub150 

260 gosub110:goto210:rem 

ttitmtliprogramma 2 
************** 

270 print"[CLR-HOME3“:poke53280,0:pake 


100 next:print"C3xspatie3C7xrechts3 


53281 ,0 


ƒ 44,90 


BLEMENTAi^y 







IIVIS I1CM 

ncei 


ANDC 
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The elementary Commodore 128 
- met Basic 7.0 - 


De onmisbare handleiding voor Uw Commodore-128, 
door William B. Sanders. 


44,90 


Bestellen kan alleen bij vooruitbetaling door overmaken van 
ƒ 44,90 op giro 3157656 Infolist Huizen met vermelding van: 
The Elementary C-128. Na ontvangst van Uw overmaking sturen 
wij U het boek op. 

Ook in de betere computerwinkel. 


INFOLIST 

Postbus 1047, 1270 BA Huizen, tel.: 02152-62343 
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28@ a=1524:k=55796:s=81:g=54272:poke w$ = “ + " : hh = 1 0 .■ b b =0 

a,s:pokeg+5,36:pokeg+6,36 30 pr i nt " CCLR-HOME3":o = a = 0 :gt=gt + 1 

290 pokeg+24, lSipokeg + 4, 1 29:-f or b = 11 o :i-fgt=llthenht = 10*ht:gt = 0: gosub 

10! pakea + b, sspokea-b.s 390:i-fsc< = 300thenhh=ht 

300 pokea+<40*b>,s:pokea-<40*b),s 40 ifsc =210 then ht = 1 0:qw*= " * " :hh = 

310 pokea+(40*b+b),sspokea-(40*b-b) 10 


t s 

320 pokea-(40*b+b>,s:pokea+(40*b-b) 

,s:nextb 

330 -forkc = ltol5: f arb«ltal0i pokek , kc 
340 pokek+b,kc:pakeg+l,b*kc:pakek—b 
■ kc 

350 pokek+(40*b),keipokek-(4@»b),kc 
360 pokek+(4@*b+b),kc: pokek-(40*b-b 
) , kc 

370 pokek-(40*b+b) ,ke!pol<sli+(40*b-b 
),kc:nextb:nextkc:return 
380 ifa$="o"thenrestaresgosub270spoke 
g +24,0:run 10 

390 returnsrem **** einde listing * 

*** 

*** EINDE LISTING *** 


kubus 


regel 

1 

25 

regel 

200 

82 

regel 

2 

222 

regel 

210 

227 

regel 

3 

238 

regel 

220 

85 

regel 

4 

143 

regel 

230 

235 

regel 

1 0 

28 

regel 

240 

40 

regel 

20 

186 

regel 

250 

1 13 

regel 

30 

55 

regel 

260 

6 

regel 

40 

27 

regel 

270 

207 

regel 

50 

81 

regel 

280 

143 

regel 

60 

220 

regel 

290 

30 

regel 

70 

O 

regel 

300 

131 

regel 

80 

249 

regel 

310 

92 

regel 

90 

187 

regel 

320 

90 

regel 

100 

207 

regel 

330 

183 

regel 

1 10 

236 

regel 

340 

230 

regel 

120 

212 

regel 

350 

13 

regel 

130 

142 

regel 

360 

230 

regel 

140 

24 

regel 

370 

246 

regel 

150 

105 

regel 

380 

1 13 

regel 

160 

39 

regel 

390 

38 

regel 

1 70 

1 05 




regel 

180 

39 




regel 

1 90 

101 

r eady. 




Rekenpen 


Als u de lichtpen gebouwd heeft volgens 


ons gepubliceerde artikel dan heeft u er nu een programma 
voor. Het geeft een rekensom in de bekende ’meerkeuze’ vorm. 


U ziet op het scherm dus een som met vier mogeiijke antwoor¬ 
den, waar er maar een goed van is. U dient nu snel te werk te 


gaan daar onderaan in beeld een balk loopt, die snel kleiner 


wordt. Als deze van het scherm verdwenen is, dan is uw tijd om 
en... Zorg dus dat u niet alleen het juiste antwoord geeft, maar 
haast u. 


1 rem rekenpen 

2 rem door w. wiinbeid 

3 rem uit ' s-heerenberg 

4 rem dit programma werkt met m.b 
.v. een lichtpen! 

3 rem 

10 poke 53280,lspoke 53281,1:pokeè 
46,0 

20 sc=0sht=10sww=50»gt=0:s=54272sq 


50 i-fsc> = 210thenht = hhs ifsc=( (3 + bb) 

* 110 )thenhh=hh+ 10 sbb=bb+l 

60 gosub360s print"CCLR-HOME3 C2xspatiel 
; n ; q w $ ; m ;"=";"C12xspatie3score= 

" 5 sc 

70 u=n+m:x=int (rnd < 1 ) *4)+1: i-f sc>20 
0 then u=n*m 

80 i-f u = 5 then 60 

90 i-fx = l then op ( 1 l=us op (2) =u + l s op 

13) = u+ 1 1 : op 14) =u+i0 

100 it x =2 then op( 1 )=u- 1 sop( 2 )=usop 
(3)=abs<u-9):op(4)=abs(u-10) 

110 i-fx=3 then op ( 1 ) =u+ 1 0 : op ( 2 ) =u + 9 
5 op(3)=us op(4)=u+l 
120 i -f x =4 then op < 1 ) =abs ( u- 1 0 ) : op (2 
)=abs(u-11) 1 op(3)=u+liop(4)=u 
130 wt=" C RVS-aan3C8xspatie3g o e dtBxsp 
at ia3 " 1 q*»" C RVS-aan 3C8xspati»3-f 
o u tCBxspatiel" 

140 for 1=1 to 4sgosub370 1 gosub3B0 
150 pr inttab( 6 )" 5 "Crechts 3 <"j 15 ") 

”>op < 1 > > sprlnttab( 22);"1 "sgosub 
380:gosub370 

160 next Is ww = ww + 5: i-fww> = 200 then 
WW=200 

170 print "Cneer 3 tRVS-aan 3C30xspatie3" 
180 o = 0s print" C 2x op 3 " s -forv=lta30s a = 
peek (53268) :o=in t ( (a-40)/36) 

190 print" " ; s -f or w= 11 o 1 00 s nex t: get 1 
nSs i-fin$ = chr*(13) then 220 
200 nextv 
210 goto 270 

220 print” CCLR-H0ME3"ïop(o)sifx=o 

then print w$:sc = sc +1 O:gasub350 
s goto 240 

230 print q$sfort=1to300snexttsgoto 
270 

240 print"C2xneer 3 CRVS-aan 3 C2x spatie3 
druk een toets voor vervolg" 

250 get i n$ : i -f i n*= " " t hen250 
260 goto30 

270 -f 0 = ( n- 1 O ) : i -f n< 1 11 henf 0 = 1 
280 ifsc>200thenprint"CCLR-HOME3":-for 
vw = f otom printvwf jin; "= "j (vw 
*m):next:goto300 

290 print"CCLR-HOMED": forvw—foton: 

printvwj " + 11 1 m | " - " \ (vw + m):next 
300 print"C2xneer 3einde spel !<!!"( . 

" C 2 xneer 3C4xrechts3score = "|sc 
1 print"C 2 xneer 3nieuw spel i/n ?" 

310 gosub390 

320 gosub400:geta*:ifa*="”then320 
330 ifa*="j "thenlO 

340 endirem w. wiinbeid 's-heerenb 
erg 

350 for-fg = ltol5step. 2: pokes + 24, -f g : poke 

s+24,tg+40:next:pokes+24,0:return 

360 m = int (rnd(1) * (ht-1> +1) :n=int(rnd 
(l)#(hh-l)+l):return 
370 printtab( 6 );":forsw=ltol4:print 
" «"J :next:print" ■"rreturn 
380 printtab ( 6 ) ; "■ " ; :-forsw=ltol5:print 
“ "5:naxt:print"«":return 
390 -forl-0to24:pokes + l ,0:next:pokes 

+1,130:pokes+5,9:pokes+15,30:poke 
s + 24, 15 

400 pokes + 4,21 :-fort = lto500: next: poke 
s + 4,20 b •fort aa lto5008 nextt return 


*** EINDE LISTING * * * 
















5W' 

vmi 


:'■■■' 


Vï'l ï 


RINT-OUT- 

PRINT-OUT- 

PRINT-OUT- 

PRINT-OUT- 
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rekenpen 

regel 1 
regel 2 

231 

151 

regel 

regel 

200 

210 

216 

34 

Wandelgang' 

Een miniatuur die een fraai effekt geeft. U waant zich in een 
eindeloze gang. Loop ze. 

regel 

4 

72 

regel 

230 

163 


regel 

5 

143 

regel 

240 

25 


regel 

10 

244 

regel 

250 

16 

1 rem wandelgang / cbm 64 

regel 

20 

254 

regel 

260 

236 

2 rem door corne casteliins 

regel 

30 

207 

regel 

270 

57 

3 rem hoogeloon / 04978-1321 

regel 

40 

191 

regel 

280 

205 

4 rem 

regel 

50 

61 

regel 

290 

107 

10 poke532B0,01poke53281,1iprint"CCLR-H 

regel 

60 

173 

regel 

300 

182 

OME]tl0xneer]Cllxrechts1commodor 

regel 

70 

33 

regel 

310 

41 

e info !!" 

regel 

80 

212 

regel 

320 

189 

20 i orx=10to200 

regel 

90 

179 

regel 

330 

56 

30 'poke53334, x s poke53335, x : nextx : goto 

regel 

100 

156 

regel 

340 

155 

10 

regel 

i 10 

140 

regel 

350 

0 


regel 

120 

198 

regel 

360 

27 

*** EINDE LISTING *** 

regel 

130 

151 

regel 

370 

151 


regel 

1 40 

73 

regel 

380 

10 


regel 

150 

59 

regel 

390 

155 


regel 

1 60 

244 

regel 

400 

125 

wandel gang 

regel 

170 

0 





regel 

1 80 

165 




regel 1 210 

regel 

190 

125 

rsady 

. 


regel 2 42 




regel 3 
regel 4 
regel 10 
regel 20 
regel 30 


ready. 


; Moe van het overtikken? 
Neem Uw gemak, neem een 




INFOLIST 



INFOLIST 


cassette of diskette 



Een macht aan software voor een 
vriendelijke prijs. 

Met zo'n cassette is er in één keer al een 
aardig begin voor uw programma-bibliotheek 
en bovendien kunt u aan de hand van de 
gegeven programma’s daar zelf weer 
uitbreidingen op maken. 


Beschikbaar voor de „64” 

uit no. 1 + 2 + 3 van '84 -> I 
uit no. 4 + 5 van '84 -> II 
uit no. 1 + 2 van '85 —> lil 
uit no. 3 + 4 van '85 —> IV 
uit no. 5 + 6 van '85 + 'Surfmania '85' —> V 
uit no. 7 + 8 van '85 —» VI 
uit no. 9 + 10 van '85 —> Vil 
Beschikbaar voor de C-16: 
Verzamelcassette incl. Checksum en Visilist 
C16 

per diskette ƒ 27,50 
per cassette ƒ 22,50 

Wilt U bij bestelling aangeven no. I, II, III, IV, \ 
VI, VII of Cl 6. 


De listings uit dit en eerdere nummers van Commodore-lnfo zijn 
ook op cassette en micro-fioppy te verkrijgen. Dat scheelt de 
lezer de tijden ergernis van het overtypen, hetgeen tenslotte zelfs 
met onze listtest nog een boel werk kan betekenen, om nog maar 
niet te spreken van ergernis en frustratie. 

De lezersservice van Commodore-lnfo wordt verzorgd door 
Infolist 


INFOLIST Postbus 1047, 1270 BA Huizen, tel.: 02152-62343 


■i 


I 


Wm 




, 






I 

I 




1 


R V.; 


Bestellen kan alleen bij vooruitbetaling door overmaken van ƒ 22,50 of ƒ 27,50 op 
giro 3157656 Infolist Huizen met vermelding van het infolistnummer en natuurlijk 
uw naam en adres. We sturen u de cassette direkt na ontvangst van uw overmaking 
per post op. 


m 
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Lettertekenaar 


Het programma lettertekenaar, tekent inderdaad letters op het 
scherm. Een tijdje geleden vroegen wij om programma’s die dit 
deden. In het vorige nummer plaatsten wij al een dergelijk 
programma, namelijk zelfschrijvend. Dit programma heeft niet 
alleen minder regels, maar het biedt ook meer mogelijkheden. 


1 rem lettertekenaar 64 

2 rem door a reitsma 

3 rem heereveen / 05130-24759 

4 rem 

10 dimt *(26) !'forx=0to2A!readat!tt (« 

)=aï:next!go5ub20000 

100 input"CCLR-HOMElgrootte(1-3 )"% aa 
110 input "dikteC2xspatie](1,2 )";a s s = 

968i i -f a=2thens»974 

114 x=-1ty”27cp“1 

115 input" welkeC2xBpatie]tekst"jw*sprint 
"CCLR-HOME] " 

116 -forqx = ltolen (wS) :a = asc (mid* <w$,q 
x))ia«a-64:ifa<lora>26thena=0 

117 a*»t*<a)igosub130inextqx 

118 pokel98,0ïprint"CHOMEDdruk een t 
oets"iwaitl98, 1iprint"CCLR — HOME]" 
s goto 100 

130 forz'ltolen (al) 

135 forq=ltoaa 

140 b»*mld»(a»,i, 1) i i -f b S «■ " p”thenp»l 

150 if bt="m"thenp=0 

160 i-fb*«"j"thenx»x-liy = y-l 

170 ifb*-"h"theny=y-i 

180 i-f b ” i " t h enx =x + 1 i y~y-1 

190 i-f bS = "b " thenx =x -1 

200 i-f b " a " t h enx “x +1 

210 i f b$=* " f " thenx = x -1: y = y+ 1 

220 i-f b*="d"theny = y+l 

230 ifb*="e"thenx=x+l:y=y+l 

240 i-fp=landx > = 0andx<80andy> = 0andy<4 


1250 data iiidddeaaihhhdddddddd-fihhii 
i 

1260 data i i i aaaaa-f -f -f -f -f aaaaa i i 
10000 datal69,,133,97,169,4,133,98,133 
,99,152,72,74,168,240,14 
10010 data 169,40,24,101,97,133,97,144, 
2,230,98,136,208,242,138,74 
10020 data24, 101,97,133,97, 144,2,230,9 
8,138,41,1,24,105,1,133 
10030 data99,104,41,1,240,4,6,99,6,99, 

162.. 161.97.160.15 

10040 data217,153,3,240,3,136,208,248, 
152,5,99,168,185,153,3,129 
10050 data97,165,98,24,105,212,133,98, 
169,1,129,97,96,32,126,124 
10060 data226,123,97,255,236,108,127,2 
25,251,98,252,254,160,32,178,177 
10070 datal65, 101,201,80, 176, 12, 141,19 
8,3,32,178,177,165,101,201,48 
10080 datal44,3,76,72,178,168,174,198, 

3.96.. .32.169.3.76 

10090 data60,3,32,169,3,140,199,3,32,6 
0,3,174,198,3,232,172 
10100 datal99,3,32,60,3,174,198,3,172, 
199,3,200,32,60,3,174 
10110 datal98,3,232,172,199,3,200,76,6 
0,3,60,3,200,76,60,3 
20000 ifpeek(828)< >169thenforx=82Btol0 
19sreadaipokex,a:next 
20010 return 

30000 rem dit is bedoeld als begin van 
een 1ettertekensysteem 
30010 rem in de array p*(n) staan de 1 
etters opgeslagen 

*** EINDE LISTING *** 


lettertekenaar 


8thensyss,x,y 
250 nextq,z 
300 return 
970 data maaaap 

1000 data iiiaezbffddeaaihhhdddei i 
1010 data i i ihh 1-f ddddddeaaihhhee 
1020 data i i i ae j b f-f d d eaa i i 
1030 data i i aae j bb-f ddeaa i hhhhhhdddddd 
d i i 

1040 data aaa i i j b f-f dd eaa i i 
1050 data iiihhhJfddddddddddde i hhhJja 
a 

1060 data i i aae i b b -f ddeaa i hhhddddddd-f i 
h i i i i 

1070 data i i i hhh i-f d dddd dd dhhh i aaeddd i 
i 

1080 data iiiddddeiimhh1jjjpemeeeddp 
1090 data i i i d d ddd ddd-f i h i i i i mh hh i i i pe 
meedddp 

1100 data i i i hh h j-f ddddd d d dhhhaa i-f bb ee 
e i i 

1110 data i i ihhh 1-f dddddddei i 
1120 data iiidddddhhhhieddddhhhhieddd 
d i i 

1130 data iiidddddhhhhiaedddd i i 
1140 data i i i ae j b-f dddea i hhhee 
1150 data iiddddddddhhhhhhhiaaeddd i i 
1170 data i 1 aae i bb-f d d eaa i hhh ddddd d d dh 
■ i i i i i 

1180 data i i i aea i f-f-f-f ea i i 

1190 data i i i aa f d ed-f b i ea i i 

1200 data iiiiihddddddddhhjea 

1210 data iiiddddeaihhhhddddd i i 

1220 data 1iidddeeiihhheee 

1230 data iiiddddeihhhdddeihhhheee 

1240 data ee i i h 1 i maaaap -f -f d ee i i 


regel 

1 

20 

regel 

2 

25 

regel 

3 

134 

regel 

4 

143 

regel 

10 

197 

regel 

100 

31 

regel 

110 

182 

regel 

1 1 4 

1 

regel 

1 15 

44 

regel 

1 16 

48 

regel 

117 

225 

regel 

1 18 

37 

regel 

130 

219 

regel 

135 

219 

regel 

140 

198 

regel 

150 

13 

regel 

160 

144 

regel 

170 

22 

regel 

180 

142 

regel 

1 90 

14 

regel 

200 

12 

regel 

210 

139 

regel 

220 

17 

regel 

230 

137 

regel 

240 

22 1 

regel 

250 

89 

regel 

300 

142 

regel 

990 

36 

regel 

1000 

15 

regel 

1010 

136 

regel 

1020 

22 1 

regel 

1030 

166 

regel 

1040 

209 

regel 

1050 

46 

regel 

1 060 

56 

regel 

1070 

44 


regel 

1080 

21 1 

regel 

1090 

5 

regel 

1100 

180 

regel 

1110 

121 

regel 

1 120 

192 

regel 

1 130 

67 

regel 

1 140 

1 79 

regel 

1 150 

155 

regel 

1 170 

53 

regel 

1 1 80 

158 

regel 

1 190 

221 

regel 

1200 

184 

regel 

1210 

67 

regel 

1220 

237 

regel 

1230 

29 

regel 

1240 

8 

regel 

1250 

45 

regel 

1 260 

216 

regel 

10000 

169 

regel 

10010 

46 

regel 

10020 

77 

regel 

10030 

108 

regel 

10040 

252 

regel 

10050 

14 

regel 

10060 

50 

regel 

10070 

125 

regel 

10080 

125 

regel 

10090 

243 

regel 

10100 

248 

regel 

10110 

188 

regel 

20003 

219 

regel 

20010 

142 

regel 

30000 

1 10 

regel 

30010 

73 


r eady 











Om een goed programma te maken hebt u behalve kennis van 
programmeren ook nog een orgineel gegeven nodig. De Heer 
Jozias de Feijter uit Ede stuurde ons een programma dat dit 
duidelijk demonstreert. Het betreft hier een denkspel voor twee 
personen. De bedoeling van het spel is om een rij getallen in 
dezelfde volgorde aan de overkant te krijgen. Iedere speler 
krijgt twee beurten per zet. Op het scherm verschijnen twee 
dobbelstenen, waarmee u negen i.p.v. zes kunt gooien. De 
eerste dobbelsteen dient voor het verplaatsen van de eerste zet 
en de tweede uiteraard voor de tweede zet. Als u dubbel gooit 
mag u een zet met de waarde van de beide dobbelstenen doen. 
Mocht u echter dubbel een of dubbel negen gooien, dan krijgt u 
een extra beurt. U kunt uw stukken zowel linksom als rechtsom 
verplaatsen. U geeft dit aan door middel van een min- of een of 
plusteken achter het te verplaatsen stuk. Dus uw zet kan luiden 
3+, 8- of 4- etc. Gebruik bij het invoeren van uw zetten echter 


niet de Return- toets. 


1 rem op tel en sprong / cbm 64 

2 rem door jozias de feijter 

3 rem uit ede 

4 rem 

10 h * = chr *(19):ult=chrt(111):ur*=chr* 
(112)!u$=chrï(183)sll*=chr*(108) 
iwt=chrt(5) 

20 lrï=chrt(18i)il*=chr$(175)izlt=chr* 
(180) > zrt = chr*(170) s zw*=chr*(144 
)| d=0i kl»5 

30 cy*=chrt(139)io*=chr*(113)irv»=chrt 
<18) ir * = c hr * (146) :x = rnd <-ti> 


dimy*(40) , x*(40) ,po* (40) ,wa(40) 
s poke53280, 12:pöke53281,1 
2ip o k e6S0,64 

pr intchrt(147)zwttab(242) "opC2xspati 
e]tel[2xspatie]enC2xspatie]spron 
g"spc(201) "joz ias"; 

forq = lto40iy*(q)= y * < q — 1)+ ch r *(17 
) !x*(q)=x*(q-1)+chr*(29>inext 

:f or q = 11oB 

rs*=right*(str*(q),1):gl*(q)=rv* 

+ wt + rst+rtigr* <q)=rv*+chr*(149) + 
rst+rtinext 

forp=lto8:po*(p)«y*(3*p-2)+x*(37 
) ! po* (p + 19)=y*(82-3* (p+19) 

)+x * ( 1 ) :nex t 

forp=9tol9:po*(p)=y*(22)+x*(61-3 
*p) : po* (p + 19)=y*(1)+x*(3*(p + 

19)-80):next 

< 147) j 

forp = 0to23step3:printvktinexts print 
h* ;iforp=0to23step3:printx*(36) 
vk*inex t 

forp=3to35step3:printh*x*(p)cy*v 
k*h* +y*(21)x*(p)cy*vk*h*;:next 

printh*zw*y*(24)x*<9) 11 opC2xspatie7 
telC2xapatie]enC2xspatie3sprong" 
h*:i*=h*+y*(7)+x4(14>iforg=lto8 
printh*po*(28-g)gl* <g> sprinthtpo 
*(g) gr* ( g) ; :wa(28-g)=gtwa(g) = 

10*gïnextg 

printh*y*(15)x*(23)" "h*cy*y*(20 

) x*(5)“+ <- "h*j«fort=0to 

Bst ep 8 

ol*=x*(15+t)+o*«o2*“x*(13+t)+o*+ 
x * (3) +o*io3* = x*(13 + t)+o* + x* (1) 

+ o* + x *(1)+o* 



Nü 

overal in de 
winkel 

Prijs 
ƒ 24,90 


Ook rechtstreeks te bestellen bij Infolist 
met de bestelbon elders in dit blad. 
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170 d$(l)=y*(ll)+al*:d*(2>=y*(9)+ol* 

+h* +y$(13)+ol*sd*(4)=d*(2)+h 

$+y*(11)+ o2* 

180 d$(3)=y$(ll)+o3*sd*(5)=d*(2)+h* 

+ y*(11> +o3*e d*(6)=d*(3)+h 
*+y$(13)+o3$ 

190 d*(7)=d*(6)+h*+y*(9>+ol*id*<B)=d 
*(6) + h*+y*(9)+o2$id«(9)=d*(6>+ 

h$+y*(9)+o3* 

200 f orp = lto9i pr inth$z wtd$ (p ) j s f or w = 
lto40 e next s printchr$(152)h $ d $( 

9 ) ; : nex t p 

210 v ( d) = int(9 # rnd(1) +1 )iprinth$zM$d 
*(v (d))j:d=d+1snextt:d=d—2 e e 

= v(d)+ v(d+1) 

220 ife=2ore=lBthenprintchr$(158) i*" 

ex trabeurt "f :forw=ltol500: next:e 
= 99 

230 ifv(d)=v(d+l)thenprintchrt(31)i $ 

" duo-sprong" 5 !kl=31sdu = 88 

240 forw=lto800!next: ifdu=8Bthenifd= 

0or d=2thend = d +1 sv(d)=2*v(d )j 

k 1 =3 1 

250 pr inth*y* ( 15>x* (23) " " 5 :t$=. if 

d = lor d = 3thenpr intchrt(kl)h*y*(1 
5)x#(23)"T"s 

260 printchr$(kl)il"nummer+/-?"j 

:wait203,63s gett * s n * = n* + t 
tiprintnti 

270 forw=lto200snext: if len (nt)<2then 
260 

280 n = val (Ufttlnt, 1 ) ) : if t " thenv 

<d>= - v (d ) 

290 nt = “"itt = " " :forz=lto38sgz=wa<z> 

:ifgz=(n*10)andd>lorgz=nand 
d<2thenp=z 

300 nextzipn=p+v(d) i ifpn>38thenpn=pn 

-38 

310 i f pn< 11 henpn = pn + 38 

320 ifwa(pn)<>@thenprintit" kan niet 
" ; s v ( d)=abs(v(d) ):forw=1to1500 
inex t s got o250 

330 printhtyt(7)x$(24>"C2xspatie]"h* 
pot(p) " " ; :wa(p)=0 

340 ifd<2thenprinthipat(pn)glt(n) 

:wa(pn)=nsforc=lto8:r=r+w 
a ( c) :n ex t 

350 ifd>lthenprinthtpo$(pn)grt(n)iwa 
(pn) =10*n:forc = 20to27:1=1+ wa( 

c) s nex t 

360 ifr=36orl=360thenprinth*y$(7)x*( 

7)"bravo,'t is gelukt"yt(IS);spoke 
650,0 ï end 

370 v(d)=abs(v(d))!r=0:l=0:du=0td=d+ 

1 sife=99thend=d-2 e e=0 

380 if d= 1 or d = 3then250 

390 ifd>3ord=0thend=0:printwtit"C2Kspati 
eiwit zet ";ikl=5sgotol50 

400 ifd>lthenprintchrt ( 149) i * "bruin 
zet " ;ikl=149:gotol50 


Bioritme 


Een Bioritme programma is niet nieuw. Waarom we dit dan 
plaatsen? Wel, het is zo fraai dat het echt de moeite waard is. U 
krijgt de fysieke, emotionele, en inteligentie curves in een 
schitterende grafiek op het scherm weergegeven. Mocht u dus 
een periode hebben dat alles mis schijnt te gaan, dan kunt u 
even kijken of het hier uw bioritme betreft. Mocht deze prima zijn 
dan zult u de oorzaak misschien bij de Halley komeet kunnen 
vinden. 



1 rem bioritme / cbm 64 

2 rem door r slegterhorst 

3 rem beat 

4 rem 

10 poke53280,0:poke53281,0:goto830 

20 printchr*(14):print“CCLR-HOME1Cneer 3 
C8EEL3C1lxspatiel** BIORITME **" 

:k= 1 s z =0 

30 x 1 = 1 1sx2=14: x3 = 32 

40 print”Cneer 3Uw bioritme over een 
maand in de":print"vorm van pro 
centen. Hoe hoger het" 

50 print"aantal procenten hoe gunst 
iger. " 

60 print"tevens kan de maand in een 
grafiek"sprint"worden weer gege 
ven (hoe hoger hoe" 

70 print" gunstiger)., 

80 print"Cneer 3Voer nu de gegevens 
in (in cyfers)s " 

90 input"C3xneer3C7xspatieISeboorte 
-dag " 5 aa 

100 ifaa<loraa>31thenprint"C7xspatie3 
Fout ! ! ! C5xop 3"sgoto90 
110 input"[neer 3 C7xspatie3Geboorte-m 
aand ";bb 

120 ifbb<lorbb>12thenprint"C7xspatia3 
Fout !!!C3xop3"sgotoll0 
130 input"[neer3C7xspatie3Geboorte-j 
aar ";cc 


*** EINDE LISTINB *** 


op 

tel 


reg 

1 1 0 

194 

en 

sprong 


reg 

120 

203 

r eg 

i 

234 

reg 

130 

1 97 

r eg 

2 

37 

reg 

140 

217 

reg 

3 

79 

reg 

150 

1 48 

r eg 

4 

143 

reg 

160 

176 

reg 

10 

133 

reg 

170 

137 

reg 

20 

153 

reg 

180 

44 

reg 

30 

27 

reg 

190 

108 

reg 

40 

249 

reg 

200 

202 

reg 

50 

107 

reg 

210 

207 

reg 

60 

1 65 

reg 

220 

106 

reg 

70 

231 

reg 

230 

96 

reg 

80 

218 

reg 

240 

166 

reg 

90 

65 

reg 

250 

245 

reg 

100 

32 

reg 

260 

137 


reg 

270 

28 


reg 

280 

56 

150 

reg 

290 

172 


reg 

300 

1 17 

160 

reg 

310 

183 


reg 

320 

26 

170 

reg 

330 

37 


reg 

340 

8 

180 

reg 

350 

1 10 


reg 

360 

178 

190 

reg 

370 

1 82 


reg 

380 

201 


reg 

390 

136 


reg 

400 

1 28 



140 ifcc<1880orcc>1985thenprint"C7xspati 
e 3 Ha ha grapjas ! ! !C3xop 3"igoto1 
30 

input"Cneer3C7xspatielMaand van 
bioritme " ; e 

ifs<lore>12thenprint"C7xspatie3F 
out ! ! !C3xop3"tgotol50 
input"Cneer 3C7xspatie3Jaar van b 
i or i tme fspr i ntchrt(142) 
ifz=@thenprint"CCLR-H0ME3":got o3 
00 

pr int " CCLR-H0ME3 C21xneer 3[rechts] 
Cneer 3dag[2xrechts3Cop3C2xrechts3 

! neer 3 



nks320"i 
200 print" 

30 C op 3 


r eady 
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«m; X3.1 «»i a 


" C4xneer3emotie"sprint”C4xneer3v 
erstand"sprint"C4xneer3gemid." 
print"CHOME3geb dat."aa"C1inks3" 
bb"Clinks3"cc"Clinks3 bioritme:" 
e " C 1 i n k s 3 " f 

ifaa<10thenxi=xl-lsx2-x2-lsx3=x3-l 

ifbb<10thenx2=x2-lsx3=x3-l 

ife<10thenx3=x3-l 

if cc< 1000andcc >-1 000th enx3-x 3-1 
ifcc<100andcc>-100thenx3=x3-l 
ifcc<10andcc>-10thenx3*x3-l 
print"CHOME3"tab(x1>"-"tab <x2>" -" 
tab <x3) 

ife=lore=3ore“5ore=7ore=Sore=10or 

e=12thende=31sgoto340 

iff/4=int(f/4)ande=2thende-29sgoto34< 

ife=2thende=28sgoto340 

de=30 

•f ord-ltode 

a=aasb=bbsc=cc 

gosub410 

g =a sa = d s b*eic-f 

g osub 410 

g«a-g 

goto520 

a=a+c*365 

i-f b<3then450 

a=a-int<b*0.4+2.3) 

c = c + l 

a=a+b*31+int(<c-l)/4) 
return 
h=6.2832*g 
p =sin(h /q) 
s = s + p 

p =int(p*100+0.5)/100 
return 
q = 23 

gosub470 

y - 1 s gosub710s remfysiek 
q-28 

gosub470 

gosub710srem emotioneel 
q=>33 

gosub47@ 

gosub710arem intelligentie 
s=int(B*100/3+0.5)/100sp=s 
gosub710s rem gemiddeld 
S-0 3 p = 0 
nextd 

i-fz=0thenz = lsgotol90 
i-f z*2then20 

print"CHOME3 C24xneer 3 CGEEL3 C7xspat ie 

3wilt u nog een bioritme 7"j 

getatii f a* = "j“then20 

ifa*< >“n"then680 

pr int " CCLR-H0ME3"iend 

i fz“0then890 

ifp<0thenp*“int(<1+p)*10) igoto750 

ifp“0thenp»“10s goto750 

ifp>0thenps-10+int <p*10) 

ify«lthenk=-k 

ifk=lthenprint"CR00D3"| 

ifk = -lthenprint“CGEEL 3”j 

print"CHQME3 C7xrechts3“j 

fort = ltodsprint"trechts]" ;s nex t 

foryl=ltoysprint"C5xneer3"jinext 

s y=y+ 1 

printp*(ps) | 
return 

dimp*(20)s p*(0 )ip$(1 ) = “■": p* 
( 2 )=”CRVS-aan3-CRVS-uit3"sp*(3)= 

*' CRVS-aan 3-CRVS-uit 3 " : p£ = " CRVS-aan3 
Cop3Clinks3 CRVS-uit 3" 
forx=4to7«p$(x)=pS+p$<x-4)snext 
forx=8tollipt(x)“pt + p* + pf(x-8) i next 
farx»12tol5ip*(x)=p$+p*+p$+p$(x- 


(x -1 6 > snext 

880 p*<20)-p*(19)sgoto20 
890 ifp<0thenps-int < (l+p)*50) sgoto920 
900 ifp=0thenps=50sgoto920 
910 ps=50+int<p*50> 

920 i f y > 11hen960 

930 pr int"CHQME3Cneer 3 geb. datumC4xspat 
i e 3 i " a a " - " b b " - " c c 

940 pr int 11 [neer 3 bioritme dat urn s "d " C 1 i n k 
s3 -"e"Cli n k s 3 - M f 

950 print" C4xneer3 fysiekC3xspatie3s" 
ps"Clinks3C2xspatie3C2xlinks3"tab< 
16) "7." s y-y+1 s return 

960 i f y-2thenpr int " Cneer 3 emot i e C3x spat i 
e3 s "ps" Clinks3C2x spatie3C 2x1 inks3" 
tab < 16) "7." s y-y+1 s return 
970 ify = 3thenprint"Cneer 3 verstand 

ps"Clinks3C2xspatie3C2xlinks3”tab( 
16)s y-y+1:return 

980 pr int " Cneer 3 gemiddelds“ps"C1inks3 
C 2x 1 i n k s 3 " t ab < 1 6) " 7. “ 

990 print "C3xneer3C7xspatie3volgende 

dag druk CRVS-aan3returnCRVS-uit3" 
000 pr int " Cneer 3C7xspatie3 druk CRVS-aan3 
nCRVS-uit3 voor volgend bioritme" 
s gotol01@ 

010 pr int " Cneer3C7xspatie3druk CRVS-aan3 
gCRVS-uit3 voor grafiek" 

020 ifd = dethenprint"CHOME3 C1Bxneer 3 C40x s 
p a t i e 3 " 

O30 geta*sifa*=""then1030 

040 ifat»chrt(13)andd< >dethenreturn 

050 ifa*-"g"thend-desreturn 

060 ifa*-"n"thend«desz«2s return 

070 gotol030 

** EINDE LISTING *** 


lioritme 


reg 

i 

reg 

2 

reg 

3 

reg 

4 

reg 

10 

reg 

20 

reg 

30 

reg 

40 

reg 

50 

reg 

60 

reg 

70 

reg 

80 

reg 

90 

reg 

100 


r eg 110 
r e g 120 
reg 130 
reg 140 
reg 150 
reg 160 
reg 170 
teg 180 
reg 190 
heg 200 
reg 210 
reg 220 
reg 230 
heg 240 
heg 250 
heg 260 
reg 270 
heg 280 
reg 290 
reg 300 
reg 310 
'eg 320 

•on 



710 

720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

.1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 
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Eeuwige kalender 


Als je wilt weten of je een zondagskind of een gehaktdagbaby 
bent, dan kun je alvast met het intypen van dit programma 
beginnen. Met dit werkelijk goed gemaakte programma van 
B.van Duyl uit Marknesse kun je een kalendarium van iedere 
willekeurig gekozen maand uit welk jaar dan ook op het scherm 
krijgen. Het vormt dus geen enkel probleem meer om te weten 
dat oud en nieuw op zondag en maandag vallen. In het jaar 2000 
dan wel te verstaan. 



1 rem esuwlgdurend» maandkalendsr m 

et de voornaamste -Feestda 

gen 

2 rem door b.van duyl, westerkimme 

5 8316 ec marknesse» o52 

73-3350 

10 color0,8,3icolor4,7,3icolorl,2,7i 
dim-f < 12) , c (35) , p (35) , q (35) , h (35) , 
b*(12),1b(12) 

20 -fori = ltol2:read-f (i> , b$ (1) ,lb(l) «next 
!fori=lto35sreadc(i),p(i),q(i),h( 
i):nex t 

30 nt 3 "(RVS-aan 3____CRVS—uit! “ sy *=" 
CRVS-aanK4xspatie] [RVS-uitl " s -f or 
i=lto6imt=m*+nt:xt=x*+y*:nsxtiw*= 
o* = " C3xneer IC 2x links)” 

40 g*="CHOME)Cneer3 Crechts)CRVS-uit) 
C38xspatie)CRVS-aan3 CHOME 3 C2xneer)” 
ifDri=ltol0:z$=zt+w$inext 
50 scnclriprintiprint"[RVS-uit)"|z*i 
pr lntiprintNt)”C3xspatieleeuwigdu 
rende maandkalender(2x9patie) <> |M$ 

60 pr int b printw*»"C2xspatie)met de v 
oornaamste -Feestdagen "(wtiprinti 
printzSsprintsprint 
70 printtprint■pr1ntiprint"voor heen 
- en weerbladereni toets + af -"i 
print* print 

80 print"voor grotere sprongeniwi11e 
keurige toets" tprintiprintiprint 
70 prmtiprintiprinttab (7) ; "welk iaa 
rtal kiest u nu";iinputa2:M»lirt 3 
“tHOME)C3xneer3 C4xrechts)" 


printtprinttab( 7 )|"en de hoeveela 
te maand " » « inputb b scncl r e- f or i =30 
72 to 3111 

pokei, 160ipokei+960, 160:nexti-fori 
B 3072to4071step40Epokei,160ipokei 
+ 39,160t next 

a*a 2 iprint"CHOME)CRVS-aan)"»tab (1 
6 );b$(b)» a;g*;:fori=lta 7 iprinttab( 

9) »"CRVS-aan)"jxSiprinttab(9)»x* 
printtab (9) jintinextiprintrt; "zo" | 
o*;"ma“;o*;"di";o*;“uo”;ot;"do";o 
* S"vr"io*»"za" 

v= 0 im»int (l/b)+(b-l)*(int( 2 /b))s b 
l = b+ 12 *mial«a-migZ=( 13 / 5 )*(bl+l)i 
nX= 5 *al /4 

o% = al/ 100 i r 7 .=al/ 400 i s“l+g 7 .+n 7 .-o 7 .+ 
rXiuX 3 s/ 7 iaX=a/ 100 ie»«- 7 *uXiife 3 ® 
thene -7 

wK“e/5ii-fa/4«int(a/4)andb“2thenv“ 

1 i i-f aX-a/ 100 andaX< > 4 * int (a/ 400 ) then 
V = 0 

i-f b“ 12 thent = e* 120 + 255 -wX*B 35 i print 
"CH 0 ME 3 Cneer)"»tab( 23 + 54 wX)»"kers 
tm."igoto 290 

i-fb»lthent*(e-i)*l 20 sprint " C HOME 3 
Cneer)"(tab (8 > » "nieuw:. “igoto 290 i 
elsei-Fb> 6 then 300 

if x« 0 t hen 240 i el sepdX-a/ 191 pg-a -19 
tpdXs pm=a— 100 *aXs pnX=aX/ 4 s po=aX -4 
*pnX:z=aX+B 

prX = z/ 25 ipsX*(aX-prX+ 1 )/ 3 s pu= 19 *p 
3 + a 7 .-pnX-psX+ 15 spuX=pu/ 30 rpw=pu -3 
0 *puXi pxX“pm /4 

py=pm- 4 *pxX:pz= 32 + 2 *po+ 2 *pxX-pw-p 
yipzX=pz/ 7 spi=pz- 7 *pzXipjX=(pg+ll 
»pw+ 22 *pi )/451 

pd=pw+pi- 7 *pjX+ 114 sbp=int(pd/ 31 )t 
pp“pd- 31 *bp + lii-fbp“ 4 thenpn“pp + 10 i 
elsepn-pp -21 

X“0iifpn>28thenbq=6:bc=3:elsebq=6 
i bc*2ï ifpn<23thenbq«5i b c = 2 
1 i-fb-bcthent-(c(pn)-l)*5iprint" EHOME3 
Cneer)"»tab(8+t)»"CRVS-uit)carnav 
.C3xlinks)Cneer3CRVS-aan)*C1inks) 
C3xneer3tClinks)C3xneer]*"igoto30 
0 

ifb=>bpthent“(p(pn)-l)*5iprint" C HOME 3 
Cneer 3";tab(8 + t> »”CRVS-uit3pasen" 
igoto290 

i-fpn>landpn< 23 orpn> 32 thenbh=bqsw» 

1ielsebh»bq-l 

i-fb = bqthent«(q(pn)-l> *5* print"CH0ME3 
Cneer 3"»tab<7+t)» "CRVS-uit3pinkst 
•"igoto290 

w“ 0 i i-fb"bhthent= 475 + 5 *h (pn) iprint 

"CHOME)Cneer3"»tab(t-472)» "CRVS-uit) 

hemelv."tgoto 290 :else 300 

y*lifori=0ta80step40s f ori«0toli poke 

3161 + t + i + j ,-f (y) iy>y+l:nextiinexti 

e i-f w“lthen2B0 

print"CHOME 3 C3xneer 3 CRVS-aan3"»tab( 

10) ;Ifori=0to35step7:fori=(2+i-e) 
to(8+j-e) 

i-fi<lthenprint"C 2 xspatie)"»selseprint 
using"##";i; 

print o*; ■ i-fi = lb (b ) +vt hen 330 e el senext 
i e print"C5xrechts3 C21xop 3"» s nextj 
getkeyd*si-fdS“" +"thenb=b+l-12*int 
(b/12)ia2»a+int(l/b)Ex=x+(a2-a)«goto 
120 

i-f d*»"-"thenb"=b-l + 12 *int ( 1 /b) ia 2 - 
a-int(b/ 12 )Bx«x+(a-a 2 >«goto 120 b el ss 
50 

data 240 , "jan. ",. 31 , 195 , "-f ebr “, 28 , 1 
95 ,"art.”, 31 , 238 , "apr. ", 30 , 194 , "m 
ei . 31,160 


^ ; O 
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INGS - C-16 LISTINGS - C-16 LISTINGS - C-16 LISTINGS I 


36® data"iumi",3®,16®,"luii",31,194," 
aug.",31,237,"sept",3®,195, "okt. » 
,31,195,"nov. " 

37® data3®,253,"dec.",31,1,4,3,5,2,5, 
3, 1,2,5,3,1,2,5,3,1,2,5,3,1,2,5,3 
, 1 , 2 , 5 , 4,2 

38® data2,5,4,2,3,6,4,2,3,6,4,2,3,1,4 
,2,3,2,4,2,3,2,4,2,3,2,5,3,3,2,5, 
3,4,2,5,3,4,2 

39® data5,3,4,2,5,3,4,3,5,3,4,3,5,3,4 
,3,6,4,4,3,6,4,5,3, 1,4,5,3,2,4,5, 
3,2,4,5,4,2,4 

40® data5,4,2,4,5,4,2,5,1,4,2,5, 2,4,2 
,5,2,4,3,5,2,4,3,5,2,5,3, 1,2,5,3, 
1,2,5,3, 1 

*** EINDE LISTING *** 


c-16 eeuwige kalender 


regel 

1 

224 

regel 

200 

28 

regel 

2 

86 

regel 

210 

206 

regel 

3 

151 

regel 

220 

26 

regel 

4 

143 

regel 

230 

234 

regel 

10 

50 

regel 

240 

209 

regel 

20 

25 

regel 

250 

105 

regel 

30 

238 

regel 

260- 

120 

regel 

40 

48 

regel 

270 

250 

regel 

50 

231 

regel 

280 

105 

regel 

60 

122 

regel 

290 

90 

regel 

70 

72 

regel 

300 

217 

regel 

80 

114 

regel 

310 

99 

regel 

90 

173 

regel 

320 

13 

regel 

100 

169 

regel 

330 

214 

regel 

110 

16 

regel 

340 

17 

regel 

120 

18 

regel 

350 

61 

regel 

130 

28 

regel 

360 

157 

regel 

140 

223 

regel 

370 

7 

regel 

150 

138 

regel 

380 

120 

regel 

160 

231 

regel 

390 

141 

regel 

170 

91 

regel 

400 

188 

regel 

180 

98 




regel 

190 

237 

r eady 

• 



Kleurencirkel 


Zoals je aan de naam kunt zien, tekent dit programma een 
kleurencirkel op het scherm. Dit gebeurt in een paar prachtig 
groene pasteltinten. Bezitters van een monochrome monitor 
zullen nu onmiddelijk argwaned worden. Zij zullen over nogal 
wat voorstellingsvermogen moeten beschikken om de diverse 
groene tinten op het scherm te kunnen waarnemen. Maar alle 
gekheid op een stokje, door de COLOR-opdracht in regel 140 te 
veranderen in b.v. COLOR1,(J AND 0)+1 zal ook voor hen de 
opzet van dit voorbeeldprogramma duidelijk worden. 


10 

rem 

kleurencircel 

20 

rem 


30 

rem 

c-16 en plus/4 

40 

rem 


50 

rem 

commodor e-in-f o <jb) 

60 

rem 


100 

t=i 



110 graphic 1,1 


120 fori =l+t to 170 step 2 
130 circle 1,160,100,3 ,100 

140 color 1,<iandl5)+l 
150 next 

160 t=t+2!gotol20 
*** EINDE LISTING *** 


checksum: kleurencirkel 


regel 

10 

87 

regel 

120 

195 

regel 

20 

143 

regel 

130 

198 

regel 

30 

160 

regel 

1 40 

207 

regel 

40 

143 

regel 

150 

130 

regel 

50 

106 

regel 

160 

140 

regel 

60 

143 




regel 

100 

55 




regel 

1 10 

108 

r e ad y. 




Kleurencirkel2 


Net zoals bij kleurencirkel wordt hier een leuke demonstratie 
gegeven van één van de grafische kwaliteiten van de C-16. Het 
verschil tussen beide programma’s is het gebruik van de RND- 
functie in dit stukje Basic, waardoor de figuur op het scherm er 
beslist bij elke run anders uitziet. 


10 rem k1eureneircel 
2 ® rem 

30 rem c-16 en plus/4 
40 rem 

50 rem c ommodor e-i n-f o < j b > 

60 rem 

70 rem programma stoppen : druk toe 
ts 

80 t = l 

90 color 0,1 
95 graphic 1,1 
100 forj = l+t to 170 step 2 
110 circle 1,160,100,3 ,100 

120 color i,int C15*rnd(0)+2) 

13® getat:ita*=chrt(32)thengraphic 0 
,1:end 

140 i -f a*< > " " t hengr aph i c 0,l:end 
150 nex t 

16® t = t+ 2:goto 100 
*** EINDE LISTING *** 


checksum: kleurcirkel 2 


regel 

10 

87 

regel 

100 

195 

regel 

20 

143 

regel 

1 10 

198 

regel 

30 

160 

regel 

120 

1 16 

regel 

40 

143 

regel 

130 

43 

regel 

50 

106 

regel 

140 

100 

regel 

60 

143 

regel 

150 

130 

regel 

70 

93 

regel 

160 

138 

regel 

80 

55 




regel 

90 

116 




regel 

95 

108 

ready. 
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incl.BTW en verzendkosten 


200 print " [CLR-HOMEHneer]naaui"spc (10 
> (mid$(-f$(b) , 1, 19) :print"nneerlad 
res"spc(9);mid$(f$(b),20,19) 

210 print"tneer!postcode"spc (6) ;midi( 

■f$(b) ,39,8) sprint "tneer]plaats"spc( 

8) j midSM-f * <b ) , 47, 14) 

220 print"[neer)geb,datum"spc(5);mid$ 

( f 6 ( b) ,61,8) sprint"Cneerltel,nr. " 
spc(7) j mid* < -f * < b ) ,69, 11) 

230 gosub660s-f*(b)“-f*(h)sgot q 40 
240 i-f h - 1 “x t h en40 

250 h = h-ls tl=“ "idountilh-l=(K)art$ = "*" 
s h = h + 1 s gosub640s1oop s goto40 
260 char,22,8,"sortering":w=h-l 
270 -f or j = 11 ow-1 :-f or k = j + 11 ow 
280 i -f -f $ ( j ) >-f$<k)thens$ = f*(j) i -f $ ( j ) =-f 
* ( k > s -f $ ( k ) = s$ 

290 nextksnextjsgoto790 

300 pr int 11 [CLR — HOME! [rechts] CRVS-aan ! 

t14xspatie!printenC14xspatie! [RVS — uit 
]"sprint"[rechts][2xneerll = et ike 
tten1 ijst" 

310 print"[rechts!tneer 12 “verjaardag 
1iist"sprint"Crechts!tneer!3 =alg 
emenelijst" 

320 print"[rechts][neer]4 =persoons 1 
ijst printen" 

330 print"[rechts!tneer)5 =terug naar 
menu" 

340 gosub 20 s i-fval (utXlorval <u*> >5then 
340 

350 onval(u*)goto360,390,420,520,40 


10 c o1 o r 0, lscolorl,4sclrsp*="C36xspati 
s g ot o30 

20 getkeyutireturn 

30 x = i n t (-f r e ( 0 ) / B9) sdinif* (x + 1) sh=l 
40 print " tCLR-HOMEKop ] [ WIT! "spc ( 10) 
"n.a.w. bestand (c)" 

50 printspc(ie)"==================" 

60 print"Crechts!t2xneer 11 “aanmaken 
bestand - max. ";xss = int(x + 1 -h) 

70 print"Cneer!Crechtsl2 =wyzigen be 
stand" 

80 print"CneerlCrechts!3 “sorteren b 
estand"sprint"[neerltrechtsl4 =pr 
inten bestand" 

90 print"[neer][rechts!5 “bestand be 
waren op disk pr int 11 [neer ! [rechts! 
6 “bestand opvragen van disk" 

100 print"Cneer!Crechts!7 “uitvoer ge 
gevens op scherm" 

110 printspc(4) "C2xneer 1nog te maken 
bestanden";s 

120 printspc(4)" = = = = = = = = = = = = = = = = = = = = = 


Uitbreidings-unit 

voor de C-16 


Via onze Infolist service hebben we speciaal voor 
onze lezers contact gelegd met een Engelse leveran¬ 
cier van uitbreidingsmodules voor de C-1 6, waarmee 
de geheugencapaciteit tot 64 KB is uit te breiden. 


ARTIC MCT 64K 
RAM BOARD 


Deze uitbreiding moet achterin de C-1 6 worden inge¬ 
bouwd (met montagevoorschrift)en laat dus de car- 
tridge sleuf vrij voor andere software. Alle C-16 
software blijft bruikbaar, maar ook de Plus/4 software 
kan nu gebruikt worden. Er is met de MCT 64K maar 
liefst 48 KB vrij in de High-Res mode (normaal 2 KB) en 
een enorme 60,5 KB vrij RAM voor Basic programma's. 


130 printspc(4)"[neerlal genaakten be 
standen"ih-1 

140 printspc(4)"===================== 


150 g os u b 20 i i-fval (u$Xlorval (u*) >7thenl50 
160 onval<u*)goto240,170,260,300,470, 

500,790 

170 print"[CLR-HOME![neer! CRVS-aan1C4xsp 
atielvoer in de te wijzigen naamC6xsp 
atie][RVS-uit]":prlntftrechts![2xneer 
S max. 19 tek. " 

180 gosub550i i -f b = x or a $ = " * " t h en 40 
190 char,1,10,"u dient gegevens opnie 
uw in te voer en " : -f or 1 = 1 t o 9 99 : n ex t 1 


Te bestellen door overmaken van dit bedrag op 
giro 3157656 tnv. Infolist Huizen met vermelding 
ARTIC. Inl, 02152-62343 



















360 Qpen2,4sfori=ltoh-lsprint#2,mid*< 
n*(i),1,19) 

370 pr int#2,mid*(f$(i>,20,19) 

380 pr int#2, mid$ (f $ (i> ,37,8) , mi dS < -f $ ( 

i),47,14)sprint#2snexti:clase2sgata40 
390 open 2,4:print #2,"naam"spc(21)" geb 
oren op" 

400 print#2, "= = = ="spc (21) "==========" 

410 ■fori = ltoh~lsprint#2,mid$(-f*(i) , 1, 

19) ; spc (6) ; mi d$ (-f * (i) ,61,8) s nex t i 
ic1ose2:goto40 

420 open2,4:-forg = ltoh-l:m=isgosLib430! 

print#2snextgsclose2sgoto40 
430 print#2,mid*(-f$(m) , 1, 19) ; spc <6) ;midS 
(■f * (ffl) , 20, 19) 

440 print#2,mid$(-f$(ni) ,39,8) ; spc (17) ; 
mid*(f*(m),47,14) 

450 print#2, "geb.dat s “jmidt(ft(m) ,61,8) ; 
460 print#2,spc(9)"tel.nri";mid*(fJ(m 
),69,11)ireturn 
470 i-f h-l<3then40 

480 char,29,12,"saving":open3,8,2,"00 
:adressen,s,w":print#3,h 
490 ■for-f = ltoh-l:print#3,f*(-f) snext-fsclose 
3:goto40 

500 char,31,14,"loading"!open3,8,2,"a 
dressen,s,r"!input#3,h 
510 fore = ltüh-li input#3, -f $ (e) snextesclose 
3:got o40 

520 print"[CLR-HOME][neerHrechts]CRVS-aa 
n]C4xspatie]voer in te printen na 
am Cl 0xspatie]CRVS-uit:i" sprint "Cr echts 
3C2xneer 3max. 19 tek." 

530 gosub 550 s i-f b = x t hen40 
540 goto630 


560 b»0sdounti1a*=cSorb=<x) 

570 b = b + ls ct=midt(f$(b) , l,v) sloop 
580 ifb=(x)thenchar,1,10,"niet gevond 
en"s ford = ltol200s nextds return 
590 char,B,6,"naam :"schar,15,6,midJ( 

■f * (b > , 1 , 19) ■ 

600 char,1,8,"is dit juist? (j/n)"sgosub20 
610 ifu$="i“thenreturn 
620 char,1,8,pt!goto559 

630 open2,4sm = bs gosub430s close2s goto40 
640 print"CCLR-H0ME3 tneerlnaam"s print 
"Cneer3adres"sprint"Cneer3postcod 
e" sprint 11 [neer Ipl aats" 

650 print"Cneerlgeb.datum"sprint"Cneer3 
tel.nr. "s i-fh-l=(x) thenreturn 
660 -fi (h ) = " " s restore940s tora=lta6s ready 

670 1$ =.char, 12, <a*2)-1 , ""s inputt*s 

char,O,20, P* 

680 i11* = "*"thenreturn 

690 iflen(t$)>ythenchar,l,20,"te veel 
tekens"s goto670 
700 i-f len (tt) =ythen730 

720 forc = ltoy-len (t $) sl$=l$+chr*(32) s 
nex t c 

730 f$(h)=f*(h)+t$ +1 $snexta 

740 char,9,15,"akkoerd (1=ja/2=nee)" 

750 char,0,17,"type (#) voor terug in 
menu"s gosub20 

760 i-fval (ut) < lorval (ut) >2then740 
770 onval(u*)goto780,660 
780 return 
790 b = 0 

800 b = b + l : print"[CLR-HOME3 Cneer 3[RVS-aan3 
C10xspatie3 ingevoerd bestand nr.CRVS- 
uit 3";b; "[RVS-aan3[Sxspatie)CRUS — uit3 " 


810 print "C3xneer3naatnC2xneer3C4xl inks3 

adresC2xneer3C5xlinks3postcodeC2xneer 
3C8xlinks3plaats" 

820 print"Cneer3geb.datumC2xneer3C9xl inks 
3tel,nr." 

830 r=5sdountilr=17schar,15,r,"s"sr=r 
+ 2 

840 1oopsrestore940sg=1sz=5 

850 e=l:dountile = 7ireadysgt = midt (t$(b 
IjS.yl: g=g+y 

860 char,17,z,gSse=e+1sz=z+2 

870 loop:char,0, 19,"toets ’spaceC2xspatie 
3voor het volgende adres" 


880 char,0 

,21,"toets 

’mC2xspatie3voor 

11|IÉI 


menu" 

s gosub20 





900 itut=" 

-"t h enb = b-2 





910 ifut=" 

+"thenb=b+9 





920 itut=" 

m"t h enb =x 





930 i f b< h- 

11h en 800 





935 goto40 






940 d at a19 

, 19,8, 14,8, 

1 1 




** EINDE LISTING *** 





c-16 

bestand 

regel 

470 

160 

V4»‘ ~ 




regel 

480 

246 

. 

regel 

10 

19B 

regel 

490 

218 


regel 

20 

219 

regel 

500 

100 


regel 

30 

122 

regel 

510 

195 


regel 

40 

127 

regel 

520 

209 


regel 

50 

87 

regel 

530 

67 


regel 

60 

6 

regel 

540 

34 


regel 

70 

168 

regel 

550 

53 


regel 

80 

197 

regel 

560 

16 


regel 

90 

1 19 

regel 

570 

129 


regel 

100 

9B 

regel 

580 

160 

.. 

regel 

1 10 

13 

regel 

590 

178 


regel 

120 

18 

regel 

600 

157 


regel 

130 

254 

regel 

610 

121 

f»; 

regel 

140 

18 

regel 

620 

158 

i ■ ; 

regel 

150 

139 

regel 

630 

61 


regel 

160 

218 

regel 

640 

171 


regel 

170 

132 

regel 

650 

231 


regel 

180 

120 

regel 

660 

47 


regel 

1 90 

190 

regel 

670 

210 

' 

regel 

200 

42 

regel 

680 

88 


regel 

210 

18 

regel 

690 

242 


regel 

220 

62 

regel 

700 

99 


regel 

230 

60 

r eg e 1 

720 

205 


regel 

240 

196 

regel 

730 

24 1 


regel 

250 

179 

regel 

740 

9 


regel 

260 

104 

regel 

750 

191 


regel 

270 

93 

regel 

760 

9 B 


regel 

280 

1 24 

regel 

770 

16 


regel 

290 

54 

regel 

780 

142 

'H 

regel 

300 

72 

regel 

790 

36 


regel 

3 1 0 

80 

regel 

800 

1 30 


regel 

320 

155 

regel 

8 1 0 

1 49 


regel 

330 

91 

regel 

820 

237 


regel 

340 

138 

regel 

B30 

6 


regel 

350 

31 

regel 

840 

46 


regel 

360 

42 

regel 

850 

1 17 


regel 

370 

57 

regel 

860 

94 


regel 

380 

192 

regel 

870. 

1 16 


regel 

390 

217 

regel 

880 

226 


regel 

400 

6 

regel 

900 

225 


regel 

4 1 0 

128 

regel 

910 

229 


regel 

420 

248 

regel 

920 

58 


regel 

430 

206 

regel 

93© 

227 


regel 

440 

13 

regel 

935 

237 


regel 

450 

217 

regel 

940 

1 06 


regel 

460 

126 

ready 
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Boxino 


Een linkse hoek, een rechtse directe of een knock-out in de 
derde ronde hoefje van dit programma niet te verwachten. Het 
heeft absoluut niets met de bokssport te maken. Dit programma 
tekent namelijk rechthoeken. Zoals je weet is Box het engelse 
woord voor doos, vandaar. Menig bezitter van een C-64 moet 
zitten zweten om een dergelijk effect op z’n monitor te krijgen. 
Dit programma bewijst, dat op de C-16 en Plus/4 er geen enkele 
PEEK of POKE naar wazige geheugenlocaties aan te pas hoeft 
te komen. 


95 graphic 1,1 
100 -forj =0tol80 step 3 
110 box ,i+t ,25,1*2,3,1/2,0 
130 geta* 

140 it a*< > 11 " t hengr aph ic @,l:end 
150 n ex t i 

155 color 1,int ( 1&*rnd(O)+1) 

160 t = t + 1sgoto 100 

*** EINDE LISTING *** 


— 

— 


checksums 

b oxin g 




10 

rem 

box i ng 

regel 

10 

86 

regel 

100 

198 

20 

rem 


regel 

20 

143 

regel 

110 

99 

30 

rem 

c-16 en plus/4 

regel 

30 

160 

regel 

130 

6 

40 

rem 


regel 

40 

143 

regel 

140 

100 

50 

rem 

commodore-in-f o (1b) 

regel 

50 

106 

regel 

150 

204 

60 

rem 


regel 

60 

143 

regel 

155 

1 16 

70 

rem 

programma stoppen s druk toe 

regel 

70 

93 

regel 

160 

137 


ts 


regel 

80 

55 




80 

t=l 


regel 

90 

116 




90 

color 0,1 

regel 

95 

108 

ready. 






VAN START MET 


DE C-16 



Een Nederlandstalig boek (168 
pag.), waarmee u niet alleen inzicht 
krijgt in wat er met Basic 3.5 alle¬ 
maal mogelijk is, maar ook veel bre¬ 
dere computertoepassingen be¬ 
handeld worden en randapparatuur 
en software uitgebreid aan de orde 
komen. 

Het onmisbare boek 
voor iedere C-16 
bezitter, compleet met 
vele 

progr ammavoorbeelden, 
zoals een klein 
tekstberwerkings - 
programma. 


Te koop bij Filmpost, Gameworld, 
Calimero, Verwijs en Stam, Collec¬ 
tief, PC-shop, Radiobeurs, Cafka. 


Van start met de C-16 in Basic 3.5 


y. y^ x. x. 


VOOR DE C- 16 | 
pook bruikbaar 


4- ^ l voor PLUS/4 


Prijs 


% ^ ^ % 


IN BASIC 3.5 


ƒ 27,50 

plus ƒ 3,— 
verzendkosten 


% % % 

.uc Sala en Olaf Simoné 

'%■ "% ^ % 



Direkt te bestellen bij: 

Infolist, Ceintuurbaan 5, 

1271 BE Huizen. 

Alleen levering na vooruitbetaling 
van ƒ 30,50. 

Gironummer 3157656 tnv. Infolist, Huizen 


















i/nieuiu/nieuiu/ 


Studiecentrum HOME BUS 

De koppeling van verschillende huishoudelijke apparaten, robots, audio- en 
videoapparatuur aan elkaar en de huiscomputer heeft een grote toekomst. Dit 
gaat verder dan het aan elkaar knopen van apparaatjes, het is een fundamentele 
ontwikkeling naar grotere gebruiksvriendelijkheid, betere besturingsmogelijk- 
heden, maar misschien ook naar een ”Big Brother” samenleving. In iedere geval 
een trend, die de aandacht verdiend en waar grote behoefte is aan informatie. 
Sala Communications heeft dit gebied kort geleden een Engelstalige 
nieuwsbrief, Home Bus Info, uitgebracht. 

De Home Bus, ook wel als SAN (Small Area NetWork) aangeduidt, is een zeer 
belangrijke ontwikkeling, waar veel bedrijven bij betrokken zullen raken. Niet alleen 
Philips en grotere bedrijven, maar ook de huizenbouwers, installateurs, de makers van 
apparatuur en natuurlijk ook de gewone consumenten. Iedereen begrijpt, dat 
bijvoorbeeld gehandicapten enorm belang hebben bij op afstand bestuurbare 
apparatuur, maar ook voor de gewone gebruiker is een koffiemachine, die vanuit bed 
kan worden aangezet naturrlijk verlokkelijk. De huidige generatie afstandbediening 
voor audio en video is al een stap in die richting en met name Philips heeft met de DDB 
(Digital Domestic Bus) hier al veel voorwerk verricht. Mede daardoor, maar ook door 
de vele internationaal georienteerde bedrijven en de goede contacten van bv. de 
TH’s, PTT en de standaardisatie-instituten bestaat de mogelijkheid, om ons land een 
leidinggevende rol te laten spelen in de verdere ontwikkeling van de Home Bus 
technologie. 

Om deze ontwikkeling te stimuleren, neemt Sala Communications het initiatief tot de 
oprichting van het HOME BUS STUDIECENTRUM. Dit centrum moet gaan fungeren 
als een documentatie- en inventarisatiecentrum voor de ontwikkelingen rond de 
Home Bus. Middels een bibliotheek, de eerder genoemde nieuwsbrief, boeken en 
andere publikaties wordt de informatie over dit onderwerp bereikbaar gemaakt en en 
de internationale communicatie bevorderd. Bedrijven en instellingen, die interesse 
hebben voor deelname, worden uitgenodigd contact op te nemen (02152-63431). 
Ook particulieren of onderwijsinrichtingen, die dit onderwerp interessant genoeg 
vinden en aan bijvoorbeeld studieopdrachten, stagewerk, tentoonstellingen en derg. 
denken, worden hiertoe uitgenodigd. 

Hier ligt een kans voor wie nu al mee wil doen aan de technologie van overmorgen. 


Philips Videowriter 

In de VS heeft Philips onder het merk 
Magnavox een heel interessant produkt 
uitgebracht. Men wil het zelf geen compu¬ 
ter noemen, maar duidt het aan als Word¬ 
processor. Het is natuurlijk wel een com¬ 
puter, die werkt met een Z-80B processor, 
een 3.5 inch microfloppy, ingebouwde 
thermische 80 koloms printer, ietwat afwij¬ 
kend , maar zeer scherp beeldscherm en 
een professioneel toetsenbord. 



Videowriter 


Qua uiterlijk, kwaliteit van de onderdelen 
en gebruiksvriendelijkheid (bijv. inge¬ 
bouwde spellingchecker) een meer dan 
fraai produkt, dat qua prijs (799 dollar) ook 
goed kan concurreren met de meer univer¬ 
sele micro’s. Men heeft dit apparaat duide¬ 
lijk ontworpen voor de leek, die op school 
of thuis een simpel te gebruiken machine 
wil hebben om brieven en teksten te ma¬ 
ken en dan zou de benaming computer wel 
eens kunnen afschrikken. Het nadeel van 
deze aanpak is, dat er geen enkele compa¬ 
tibiliteit is tussen deze Videowriter en an¬ 
dere computers en dat is eigenlijk wel 
jammer. Met weinig moeite had men ten¬ 
minste de microfloppy data-compatibel 
met bv. de MSX en de MS-DOS floppy 
kunnen maken, maar misschien komt dat 
nog. In ieder geval een verrassende machi¬ 
ne, qua ontwerp op zeer hoog peil en met 
een duidelijke doelgroep en marketingfilo- 
sofie van de Philips HIS divisie. 

Telarium 

Dit software-label heeft het adventure 
en de zogenaamde interactieve fictie 
tot een ware kunst verheven. We geven 
wat voorbeelden van hun nieuwste pro- 
dukten, waaruit blijkt, dat uit boeken of 
TV-series soms inspireren tot echte 
software- vernieeuwingen. 

Perry Mason 

Perry Mason is de wereldberoemde detec- 
tive-strafpleiter van de auteurEric Stanley 
Gardner. Na 85 boeken en de succesvolle 
TV-serie biedt het programma "The Case 
of the Mandarin Murder” u de kans om zelf 
eens de balie te betreden. 

U, als Perry Mason, bent natuurlijk niet 
voor één gat te vangen. Met behulp van uw 
secretaresse Della Street en de detective 
Paul Drake wordt de plaats van het misdrijf 
grondig uitgekamd. De belangrijkste actie 


speelt zich echter in de rechtszaal af waar 
u als Perry Mason schittert. Hier ontspint 
zich een uniek rollenspel waarbij Perry 
Mason zijn cliente weet vrij te pleiten, de 
ware moordenaar ontmaskert en laat be¬ 
kennen. De Telarium-programmeurs heb¬ 
ben er alles aan gedaan om de handelin¬ 
gen in zo’n Amerikaanse rechtzaal nauw¬ 
keurig te simuleren. 

The Case of the Mandarin Murder is een 
fraai graphics en tekst video rollenspe- 
I,omlijst met de muziek uit de tv-serie. De 
hoge mate van spelerinteractie en de zorg¬ 
vuldige opbouw maken dit Perry Mason 
verhaal tot veel meer dan een doorsnee 
mystery-adventure. Op disk van Telarium 
voor rond de ƒ100,-. 

SF: Nine Princes in Amber 

De bekende Science Fiction- en Mystery- 
auteur Roger Zelazny schreef vier romans 
over de wederwaardigheden van de negen 
prinsen van Amber. Hun strijd gaat om de 
macht in het legendarische koninkrijk Am¬ 
ber en tegen de boze krachten uit de 
omringende Schaduwlanden. Nine Prin¬ 
ces of Amber is gebaseerd op de eerste 
twee delen van de serie. 

Ook in dit Telarium-spel ligt de nadruk op 
de spelerinteractie. Alle politiekintriges, 


onderlinge twisten en veldslagen maken 
wel 40 verschillende speluitkomsten mo¬ 
gelijk! 

Bij het begin van het spel ligt de held met 
geheugenverlies in een ziekenhuisbed. 
Een aantal familieleden heeft geprobeerd 
hem te elimeren. Na de ontsnapping uit het 
hospitaal leert de Amberprins zijn vier zus¬ 
ters en achtbroers opnieuw kennen. Aan¬ 
slagen bedreigen zijn leven, allianties en 
het mysterieuze patroon moeten de prins 
helpen om de Ambertroon te kunnen be¬ 
stijgen,veldslagen moeten gewonnen- en 
de krachten van Schaduw beteugeld 
worden. 

Voor het dirigeren van de hoofdpersoon is 
het spel sterk afhankelijk van werkwoor¬ 
den als negotiate (onderhandelen), chal- 
lenge (uitdagen) en propose(voorstellen). 
Een verkeerde keuze leidt al gauw tot 
verraad of moord. Een eenmaal ingesla¬ 
gen weg laat zich niet meer veranderen en 
het spel vervolgt dan haar pad naar een 
van de 40 oplossingen. 

Nine Princes in Amber is een muzikaal en 
grafisch goed verzorgd adventure. De rol¬ 
lenstructuur wijkt af van soortgelijke spe¬ 
len en stelt de intelligentie van de speler 
danig op proef. Op disk van Telarium voor 
| rond de ƒ 100,-. 




VRAGEN VAN GEBRUIKERS 



Printer opdrachten 

Vooral bij de niet-Commodore printers 
komt het voor, dat er bepaalde bestru- 
rings-codes naar de printer moeten 
worden gestuurd, om de printer de 
juiste opdrachten te verstrekken. 

De heer Breteler uit Vinkhuizen heeft 
problemen met de juiste interpretatie 
van deze codes naar de Commodore- 
Basic. 

Het aansturen van een printer is in de 
handboeken inderdaad niet altijd even dui¬ 
delijk beschreven. Vaak wordt er volstaan 
met het noemen van de betreffende con- 
trole-codes, en de gebruiker moet het ver¬ 
der maar uitzoeken. Erg ingewikkeld is de 
oplossing overigens niet. 

De ASCII-codes die worden gebruikt voor 
de printerbesturing t.o.v. lettertype, 
-grootte etc, hebben in het meer algemene 
gebruik meestal niet een getalswaarde 
maar bestaan uit een afkorting van het 
woord dat de betekenis van de code aan¬ 
duidt. Zodra afkorting en getal met elkaar 
in verband kunnen worden gebracht is de 


circel rond, want dan kunt je de ASCII- 
waarden naar de printer toesturen als 
CH R$(ASC 11 -waarde). 

Hierbij een tabel van de meest voorkomen¬ 
de ASCII-waarden met de afkortingen: 
Printer Besturing;. 


CHR- 

$0 

■ Afk. 

Omschrijving 

0 

nul 

null karakter (stop) 

1 

soh 

start heading 

2 

stx 

start tekst 

3 

etx 

einde tekst 

4 

eot 

einde transmissie 

5 

enq 

enquiry 

6 

ack 

acknowledgement 

7 

bel 

ring bel 

8 

bs 

spatie terug 

9 

ht 

horizontale tab 

10 

lf 

line feed 

11 

vt 

vertikale tab 

12 

ff 

form feed 

13 

cr 

carriage return 

14 

so 

shift out 

14 

si 

schift in 

15 

die 

data link escape 

27 

esc 

escape 

28 

fs 

file separator 


Intikfouten 

Naarmate de listings ingewikkelder 
worden, blijken er ook meer mensen 
moeilijkheden te ondervinden bij het 


intypen. Ook de listings uit het groot 
listingboek blijken soms nog wel voor 
wat problemen te zorgen. Zo heeft Ru- 
dy Pauwels problemen met bepaalde 
tekens in een printopdracht (Woestijn- 
race) 

In de verschillende Basic-listings vind je zo 
nu en dan tekens die op het eerste gezicht 
wellicht wat vreemd overkomen. Zo staat 
er in het prachtige programma Woestijnra- 
ce bijvoorbeeld een opdracht die lijkt op : 
PRINT ” { 6 x SPATIE } {links} {INSert}”. 
Om de listing (waar overigens geen fouten 
in zitten) goed in de computer te kunnen 
intikken moet je alle tussen spekhaken 
vermelde tekens op dezelfde manier inty¬ 
pen als vermeld. Dit geldt ook voor de INS 
toets in dit geval. Denk er daarbij wel om, 
dat je niet letterlijk de haken en de tekst 
overneemt, dus geen 6 x SPATIE intypt, 
maar daarvoor 6 keer op de spatiebalk 
drukt. Om dit alles goed over te nemen, 
moet je ervoor zorgen, dat een soortgelijke 
regel altijd begint met het intoetsen van het 
aanhalingsteken, (”). Gebeurt dat niet, dan 
weet de computer niet, dat je in Quote- 
mode aan het werken bent, en dat geeft 
zonder meer problemen bij toetsen als 
CURSOR-UP of INSERT. Een troost voor 
degenen die met dit probleem te kampen 
hebben, je bent zeker niet de enige, maar 
Basic is nu eenmaal nogal kritisch waar het 
z’n syntax betreft. 
















Syntax Checksum 

Nog altijd krijgen we wanhopige vragen 
over het niet werken van de listtester uit 
C-Info. Hier weer een prachtig voor¬ 
beeld van W.Sparrenburg uit Zwijn- 
drecht. Hij stuurt een listing mee, die hij 
vele malen heeft gecontroleerd, maar 
toch.... 


Nog maar een keer de uitleg. Dit is een 
methode om de ingetypte listings van AN¬ 
DERE in C-l afgedrukte programma’s te 
controleren. Daartoe is daarachter een 
aparte lijst controlegetallen opgenomen, 
die je NIET moet overnemen. De Listing- 
tester werkt als volgt, typ het Listingtest- 
programma letterlijk over, zoals dat op 
gezette tijden staat afgedrukt in ons blad. 
Controleer vooral de data-regels, en kijk 
naar de plaatsen waar de komma staat. In 
bepaalde edities is de listing zodanig afge¬ 
drukt, dat een datagetal bv. 163 over twee 
regels is verdeeld. Dan staat er 16 op regel 
1 en de 3 op de volgende regel. Het zal 
duidelijk zijn, dat daartussenin geen kom¬ 
ma moet staan, hoewel die er bij het over¬ 
typen toch nog wel eens tussen sluipt. Na 
saven en RUN kun je gaan testen met ’SYS 
49152’. Als er niets anders in het Basic 
geheugen staat dan de Listingtester zelf, 
dan komen de daarbij behorende controle¬ 
getallen naar voren, bij andere program¬ 
ma’s wat daarbij hoort. Die andere pro¬ 
gramma’s kun je na een Run van de Lis¬ 
tingtester en een New gewoon intypen of 
inladen, dieper in het geheugen blijft dan 
het testprogramma zitten en met de SYS 
49152 gaat dat pas actief worden. Op het 
scherm verschijnen dan de regelnummers 
met het controlegetal. Wil je de listing even 
stoppen, dan druk je op RUN/STOP, het 
programma gaat verder door het indruk¬ 
ken van F1 of F7. Om de getallen op de 
printer te krijgen typ je: OPEN 4,4: CMD 4 : 
SYS 49152. Na het listen sluit je het prin- 
terkanaal door PRINT #4 : CLOSE 4. In de 
listing van de briefschrijver kon ik meer 
dan één fout opsporen. Een bewijs dat er 
niet altijd even goed wordt nagekeken en 
wat te snel naar de pen of de telefoon 
wordt gegrepen. 

Toetsenbord uitschakelen 

AFournier uit Maarssenbroek heeft er¬ 
gens gehoord, dat het mogelijk is om 
het toetsenbord van de C-64 uit te 
schakelen. Hij vraagt hoe dat in een 
Basic-programma kan worden gedaan. 

Het afzetten van het C-64 toetsenbord kan 
door in een Basic-programma de opdracht 
POKE 649,0 te zetten. Vanaf dat moment 


is de pointer voor de grootte van het 
toetsenbordbuffer op nul gezet, en kun je 
allerlei toetsen intypen, zonder dat de 
computer daarop reageert. Deze truuk is 
handig bij het werken met de joystick, 
omdat je op die manier geen rekening 
hoeft te houden met toetsen die per onge¬ 
luk worden ingetypt. Om het keyboard 
weer te aktiveren geef je simpelweg de 
grootte van het buffer op en poked dat 
terug in adres 649. De standaardlengte 
van dit buffer ligt op 10, dus POKE 649,10 
zet alles terug naar normaal. Om nog even 
over het toetsenbord-buffer door te gaan, 
dit is een serie geheugenplaatsen, waar de 
al ingetypte, maar nog niet verwerkte 
toetsaanslagen worden bewaard. Je kunt 
dus maximaal tien aanslagen in het voren 
typen, die worden allemaal netjes ver¬ 
werkt. Grotere getallen dan 10 kunnen 
helaas niet in adres 649 worden gepoked, 
want dan gaat het toetsenbordbuffer over 
andere pointers heen en zal de computer 
het laten afweten. 

Audio-in op de C-64 

Dhr. Snauwaert vraagt of het mogelijk is 
om met hulp van de Audio-ln pin op de 
Video connector het signaal te kunnen 
weergeven op het scherm, dit in de 
vorm van b.v. de frequentie van het 
signaal. 


De mogelijkheid om van buiten af een 
geluidssignaal naar de SID-chip in de 64 te 
sturen is standaard aanwezig. Het ln-sig- 
naal moet dan worden aangesloten op pin 
5 van de Audio/Video-bus. Deze ingang 
zorgt ervoor dat een signaal, b.v. je eigen 
stem kan worden gemengd met de in de 
SID al aanwezige signalen uit de 64 zelf. Je 
kunt daardoor externe geluiden met de C- 
64 bewerken en heel anders langs Audio- 
out weer terug sturen naar je HiFi installa¬ 
tie. Het Wersi-bord maakt gebruik van 
deze mogelijkheid. In principe moet het 
mogelijk zijn om het ingevoerde signaal uit 
een bepaald SID-register op te pakken en 
de resonantie frequentie ervan te gaan 
bepalen. Daar komt echter wel de nodige 
machinetaal bij kijken. 

Gemini-printer 


A.J.Severijnen uit Son heeft onlangs 
een DC-64/Gemini-10X printer aange¬ 
schaft. Hij gebruikt deze printer samen 
met de C-64. Z’n probleem ligt in de 
speciale printer-karakters van Easy- 
Script. Hij heeft nog geen mogelijkheid 
gevonden om in de tekst het lettertype 
te veranderen of b.v. te onderlijnen. 


Op de Gemini-printers zit een schakelaar, 
waarmee twee printer-standen kunnen 
worden geselecteerd. Daarbij heb je de 
keuze tussen LIST en ASCII. Bij het werken 
met EasyScript moet de Gemini in de 
stand ASCII worden gezet. Daarna werken 
de meeste ES.tekst opdrachten precies zo 
als ze in de handleiding staan beschreven. 
Er zitten een paar bijzondere tekens bij, 
maar door het testen van alle tekst-moge- 
lijkheden uit EasyScript is zo te bekijken 
wat de exacte gevolgen van de diverse 
opties zijn. Zelfs zit er op de (originele) disk 
van deze tekstverwerker een demo waar¬ 
mee al deze verschillende tekst-modes 
worden getoond. Gewoon inladen en 
draaien. 

Vreemde drive 

AJ.Bakker uit Alkmaar heeft indertijd 
een Nitasuga diskdrive aangeschaft 
om te gebruiken met z’n 64. Over het 
algemeen is hij tevreden met de wer¬ 
king van het apparaat, maar er zitten 
wat addertjes onder het gras. Soms 
werkt de drive niet zoals het hoort. 


Het gebruik van een niet Commodore- 
drive is in feite aan iedereen af te raden, 
hoe mooi de aanbieding van zo’n apparaat 
financieel gezien ook lijkt. Commodore 
heeft nu eenmaal de eigenaardigheid zelf 
een eigenzinnig operating systeem te be¬ 
denken voor z’n spullen. De concurrent 
bekijkt zo’n ding van buiten, en zorgt er 
vervolgens voor, dat met hulp van een 
vertaalsysteem, de normale (Basic) Com¬ 
modore opdrachten kunnen worden ver¬ 
werkt. Zodra er echter aparte opdrachten 
worden gebruikt, die direkt ingrijpen in het 
drive-operating systeem, laten deze appa¬ 
raten het meestal afweten. Een voorbeeld 
daarvan vind je ook bij de diverse Commo¬ 
dore drives. Als je b.v. probeert om een M- 
E (memory execute) opdracht te geven aan 
een 1570 die in feite bedoeld is voor de 
1541 loop je op z’n minst de kans dat er 
niet gebeurt wat je verwacht. Als tenmin¬ 
ste de zaak niet meteen vast gaat zitten. 
Ditzelfde doet zich voor bij de namaak- 
drives van andere merken. En daar valt 
helaas niets aan te veranderen. 

J.B. 
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De toepassingen, techniek en ontwikkelingen van de digitale spraaksynthese en 
-herkenning komen aan de orde in deze bijdrage van Ulco Schuurmans. 


Spreekt u maar! 

Converseren 
met de 
Commodore 


N og maar tien jaar geleden was 
een sprekende computer een 
Science fiction fenomepn. In 
films of hoorspelen gaven kra¬ 
kerige robotstemmen ongeveer 
aan, wat men er van verwachtte. Mo¬ 
menteel is het echter niet vreemd meer 
als uw auto, kopieermachine of camera 
tegen u praat of dat bij een postorderbe¬ 
drijf een beleefde computer de bestel¬ 
lingen opneemt. 

Ook voor home- en personal computers 
komt langzamerhand meer sprekende en/ 
of luisterende soft- & hardware ter be¬ 
schikking. Die digitale spraak heeft een 
aantal interessante kanten. 

Waarom spraak- 
computercommimicatie? 

Op het eerste gezicht lijkt het een wat 
griezelige ontwikkeling. Is spreken met 
een stuk elektronica nu echt wel zo nodig? 
Wij staan er eigenlijk nauwelijks bij stil dat 
het gesproken woord in het dagelijks leven 
belangrijker is dan de geschreven commu¬ 
nicatie. De telefoon speelt daarbij met 
name een enorme rol. Het schrift, laat 
staan het communiceren per toetsenbord, 
komt op een tweede plaats. Alles, wat 
geschreven moet worden (even voorbij¬ 
gaand aan de massale communicatie in 
b.v. de krant) levert meestal een behoorlij¬ 
ke tijdvertraging en extra werk op. In zeke¬ 
re zin is toetsenbord-communicatie ook 
niet erg effectief, het vraagt een tussen¬ 
stap, waarin tijd verloren gaat. In de nor¬ 


male dagelijkse conversatie schrijven we 
elkaar immers ook niet altijd getypte 
brieven. 

Mogelij kheden 

We kunnen technsch gezien met geluid 
drie dingen doen, namelijk opnemen (her¬ 
kennen), bewaren (opslaan) en weergeven 
(genereren). In de praktijk ervaren we dat 
als spreken en luisteren, maar het opslag- 
aspect is op zich ook interessant. De spre¬ 
kende en luisterende computer is overi¬ 
gens beslist niet onnatuurlijk. Zij biedt zelfs 
een groot aantal interessante mogelijk¬ 
heden: 

O Bekend is het verlevendigen of realisti¬ 
scher maken van Videospelletjes. Voor 
de C-64 zijn daarvan al een aantal boei¬ 
ende voorbeelden te koop, al gaat het 
dan nog wel om een beperkte woorden¬ 
schat, zoals het aftellen van de start en 
wat waarschuwingen. 

0 Educatieve programma’s; voor de hand 
liggen taalcursussen, maar vele andere 
leerling-leraarcombinaties zijn mogelijk. 
De Atari 400/800 heeft door het vrijhou¬ 
den van een van de stereo-kanalen op 
de cassetterecorder voor geluid al een 
aantal interressante taalprogramma’s 
opgeleverd. De volgende stap zou iets 
dergelijks via electronische spraaksyn¬ 
these kunnen zijn. 

0 Het doeltreffend geven van opdrachten 
in die situaties waarbij men de beide 
handen al vol heeft. Bijvoorbeeld voor 
piloten, chirurgen, tandartsen of astro¬ 


nauten. Maar bij de voordeur met de 
handen vol pakjes is een automatische 
spraakherkenning/deuropener ook wel 
handig en in het Japanse Kansai huis 
van de toekomst heeft men ook zoiets 
gerealiseerd. 

0 Het toegankelijker maken van compu¬ 
tersystemen; de toetsenborddrempel 
wordt weggenomen en typecursussen 
behoren tot het verleden. Hier zou de 
weg van spraak naar papier sneller kun¬ 
nen verlopen dan via een stemnotypis- 
te. Spraakverwerking als verlengstuk 
van tekstverwerking. 

0 Telefonische hulp- en boodschappen¬ 
dienst voor dag en nacht. De digitale 
opslag van de gesproken boodschap¬ 
pen zou de bereikbaarheid kunnen ver¬ 
hogen. 

0Bewakings-, alarmerings en voorlich¬ 
tingsfuncties; kortom overal waar men 
snel en zonder poespas exacte infor¬ 
matie over de stand van zaken behoeft. 
De computer bepaalt zelf welk stuk info 
op dat moment het meeste houtsnijdt 
voor de dienstdoende operateur zonder 
paniektoestanden te scheppen! En ook 
de inbreker kan worden toegesproken 
door een bewakingssysteem, wanneer 
hij op verboden terrein is. 

0 Het helpen van invaliden; zowel verlam¬ 
den als zintuig- en spraakgestoorden 
kunnen bij hun dagelijkse levensverrich¬ 
tingen veel baat bij hun computer vin¬ 
den. O.a. besturing van de invalidewa- 
gen en huishoudelijke apparatuur en 
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het bedienen van de telefoon. Voorlees- 
machines voor blinden (Kurzweil) zijn al 
een aantal jaren op de markt. 

Opslag 

Met een computer gegevens bewaren is 
geen nieuws, daarvoor zijn er RAM geheu¬ 
gen, cassettes, diskettes en andere media. 
Maar digitale (of gedigitaliseerde) spraak 
opslaan vreet helaas geheugen, dus met 
kleine hobbycomputers kom je daaraan 
niet toe. Bij zakelijke PC’s zijn er wel 
spraak-opslag systemen, zo heeft IBM de 
Personal Computer Voice Communicati¬ 
ons Option, een insteekkaart, waarmee 
spraak herkenning, spraakopslag, telefoon 
management en modemfuncties mogelijk 
worden. ER zijn naast de hardware ook 
nog allerlei software pakketten nodig om 
hier werkelijk iets mee te doen en het totaal 
komt dan tussen de vijf- en tienduizend 
gulden. 

Tweeweg 

Aan de digitale geluidstechniek zitten 
naast de opslag twee kanten, namelijk het 
"spreken” en het "luisteren”. Het spreken 
is een kwestie van spraak- en geluidssyn- 
these, bij het luisteren komt het herkennen 
van patronen aan de orde. Spraaksynthe¬ 
se, zeker van een beperkte woordenschat, 
is relatief eenvoudig, herkennen daarente¬ 
gen een ingewikkelde materie. 

Spreken 

Spraak kan met de C-64 en de C-128 en in 
mindere mate met de VIC en C-16 ook 
zonder veel extra’s alleen in software ge¬ 
realiseerd worden. De SID-chips van de 
Commodore zijn zoals bekend tot verras¬ 
send natuurlijke spraak- en geluidssynthe- 
se in staat. Voor wie wat meer wil zijn er 
speciale spraaksynthese insteekmodules, 
zoals de Magie Voice module van Com¬ 
modore zelf. Het Engelstalige programma 
beschikt van huis uit over een vocabulaire 
van 235 woorden die door een plezierige 
vrouwenstem uitgesproken worden. Daar¬ 
naast kunt u zelf spraakopdrachten geven 
of in programma’s inbouwen. Het com¬ 
mando Say "Commodore” doet het 
woord Commodore uit de luidspreker ko¬ 



Spraakdigitalisatie 


men. Een eenvoudig BASIC-programma 
ziet er bijvoorbeeld als volgt uit: 

10 SAY "Commodore” 

20 SAY "Info” 

30 SAY "Magazine” 

Verder zijn mogelijk: aanpassing van de 
spreeksnelheid en stemklank (o.a. manne¬ 
en kinderstemmen), spellen, het raadple¬ 
gen en gebruik van een extern disk/casset¬ 
te vocabulaire, simultaan programmeren 
van spraakoutput, muziek en graphiesbe- 
wegingen, en spraak programmeren in As- 
sembly Language. De Magie Voice Modu¬ 
le is niet in staat tot spraakherkenning of 
het uitvoeren van gesproken opdrachten. 
Ook vinden we het relatief beperkte voca¬ 
bulaire wel wat remmend, ook al omdat het 
resultaat onherroeplijk Engels aandoet. 

VIC-20 

Verder heeft ook Adman (Ripon Way, Har- 
rogate, N.Yorks, HG1 2AU in Engeland, tel. 
0621-740972) al wat langer een module 
voor de VIC 20, de Speech Synthesizer, 
maar nu komt men ook met iets voor de 64. 
Voor ruim 150 gulden levert men een uni¬ 
versele spraaksynthese module, waarmee 
allerlei stukjes tekst kunnen worden uitge¬ 
stoten. Wel met een zwaar Engels accent, 
want de stukjes van woorden, waar de 
module mee werkt, worden op een Engel¬ 
se manier vertaald in geluiden via opsplit¬ 
sing in allofonen. Dat maakt het vocabulai¬ 
re wel veel groter, want alle woorden kun¬ 
nen worden samengesteld. 

Voice Command Module C-64 

Op de afgelopen Consumer Electronics 
show in de VS werd een nieuw spraakher- 
kenningsmodule voor de C-64 getoond. 
Deze Voice Command Module VCM-64 
maakt het voor $49,- mogelijk om de C-64 
in het Engels gesproken opdrachten te 
laten uitvoeren. De komplete set bestaat 
uit de command module zelf, een aansluit- 
kabel voor de userport, een Electret-micro- 
foon en software op disk. Het hoofdmenu 
biedt zes in principe zelfstandige program¬ 
ma’s waarvan het SOS de belangrijkste is. 
Het Speech Operating Systeem maakt het 
mogelijk om een eigen vocabulaire van 
opdrachten samen te stellen. Een tamelijk 
tijdrovende procedure omdat elke op¬ 
dracht wel 20 maal herhaald dient te wor¬ 
den om een goede vergelijkingsmaatstaf 
te realiseren. Teneinde u het inwerken wat 
te vergemakkelijken wordt een demorouti- 
ne bijgeleverd. Deze bestaat uit een spelle¬ 
tje waarbij een heteluchtballon op bevelen 
als”UP”, "DOWN”,"HOT”,”COLD”e.d. rea¬ 
geert. Verder zijn er nog de demoprogram- 
ma’s "WORD MIX” en "CARD FILE", waar¬ 
van de laatste als telefoonklapper gebruikt 
kan worden. Tot slot biedt de VCM64 de 
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mogelijkheid om met Speech Graphic uw 
woorden grafisch weer te geven . Kleine 
veranderingen in intonatie zijn direkt zicht¬ 
baar en tonen hoe moeilijk spraakherken¬ 
ning voor de computer is. Inmiddels is de 
Voice Command Module al op de Duitse 
markt gesignaleerd en zal hij binnenkort 
ook in Nederland verkrijgbaar zijn. 

Voice Box 

De Amerikaanse leverancier Alien biedt de 
&17Voice box voor Vic en 64. Dit impone¬ 
rende stukje hardware past op de user- 
poort. Voice Box biedt tal van mogelijkhe¬ 
den zoals TypeTalk (uitspreken ingetypte 
tekst op z’n engels) en PSPEAK/FSPEAK/ 
SPEAK voor inbouw van spraak in basic- 
programma’s. De spraak van de Voice Box 
is vrij goed, terwijl er ook nog een goede 
muziek-synthesizer is ingebouwd. 

Muziek 

Dit is een onderwerp op zich, want de SID 
chip van de Commodore is in eerste in¬ 
stantie meer bedoeld voor muziek dan 
voor spraak. Er zijn hele reeksen Music 
Composers en andere muziekpro¬ 
gramma’s. 

Luisteren 

Pas bij het analyseren van de menselijke 
stem blijkt hoe ingewikkeld deze commu¬ 
nicatievorm is. Volume, toon, timbre, stem¬ 
loze (s, f, ch, e.d.) en stemhebbende (klin¬ 
kers, m, n, I, r) klanken dragen elk afzonder¬ 
lijk tot de uiteindelijke spraakvorm bij. In de 
fysica noemt men deze spraakcomponen- 
ten formanten. Met 13 van deze formanten 
kan men spraakpatronen beschrijven, co¬ 
deren en decoderen. Een dergelijke wijze 
van spraak coderen vreet helaas ontzet¬ 
tend veel geheugencapaciteit. Het 128 ki¬ 
lobyte RAM-geheugen van de C-128 laat 
het zo al na een seconde of 16 afweten! 
Daarom streeft men naar vereenvoudiging 
van de digitale geluidsregistratie of met 
een technische term Puls Code Modulati- 
on (PCM), waarbij 8000 keer per seconde 
de signaalwaarde wordt gesampled en 
omgezet in een Byte. Via PCM worden 
bijvoorbeeld nu al de digitale AXE en PRX 
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telefooncentrales bezocht met eindeloze 
reeksen pulsjes, de weerslag van wat de 
telefoon in analoge vorm opneemt. Maar 
dan is per seconde ook al 64 KiloBit nodig, 
denk eens in hoeveel bits er dus door een 
beetje druk bezette centrale jagen. Kan dat 
niet wat handiger, zou je denken. Is er geen 
slimme manier om met wat minder bits 
toch duidelijke boodschappen over te 
brengen. Met een bekend Nederlands ge¬ 
zegde: ”Een goed verstaander heeft aan 
een half woord genoeg”. Een dergelijke 
simplificatie gaat slechts voor een deel op, 
gedeeltelijke of verminkte informatie geeft 
jammer genoeg bij de niet-intelligente 
computer al snel aanleiding tot misvat¬ 
tingen. 

Compressie 

Toch zoekt men wel naar methoden om de 
zaak in te dikken, maar dat is niet erg 
eenvoudig. Maak maar eens onderscheid 
tussen vlaai en zaai als je uitsluitend aai 
kunt herkennen. Wel kan men de stiltes 
tussen woorden natuurlijk via filtering wel 
indikken, dat gebeurt ook bij de telefoon al 



wel, vooral bij internationale verbindingen. 
Veel spraakherkenningssystemen werken 
wel met taalcompressie. De computer pikt 
een bepaald significant woord- of zinsdeel 
op en vergelijkt dit met een zgn.'template’ 
in zijn (RAM-)geheugen. Een template is 
een stukje digitale spraak (patroon) her¬ 
kenning (in het voorbeeld dus aai) dat van 
een disc geladen wordt. De grootte (het 
aantal bits) van de template bepaalt de 


selectiviteit, in het ideale geval dienen er in 
ons voorbeeld een zaai- en vlaai-template 
voor handen te zijn. Ook voor de spraak- 
weergave maakt men gebruik van tem- 
plates. 

Behalve met herkenning krijgt de ontwer¬ 
per van digitale spraak en spraakherken¬ 
ning ook nog met interpretatie- en HiFi- 
normen te maken. Onze hersenen hebben 
geleerd gesproken teksten te interprete¬ 
ren. Een verkeerde intonatie wordt zo on¬ 
dervangen, hetgeen uw hobbycomputer 
niet zal lukken. Tandenstoker wordt zo 
bijvoorbeeld tot de Chinese spoorwegbe¬ 
ambte Tan de stoker. Ware HiFispraak 
vereist 25000 bits per seconde. Volstaat 
men met slechts 4000 bits dan is het 
gesprokene nog net verstaanbaar. 

De voornaamste problemen schuilen voor¬ 
alsnog in de benodigde geheugencapaci¬ 
teit. Omzetting van de analoge spraak in 
digitale signalen vormt met de moderne A/ 
D-converters geen probleem, maar dan 
moet het nog wel herkend worden en dat 
kost erg veel ruimte en processorcapaci- 
teit. • 



asss- 


Let op viditelgebruikers! 

U kunt nu GRATIS inloggen op ons 
databank-systeem (viditel-compatible) 
telefoon: 075 - 351187 _ 


Uitgaande van de brother CE61 heeft Micro Plus 
een nieuwe printerschrijfmachine ontworpen: 
de CE61KL 

Als schrijfmachine Beschikt de CE6IIXL onder meer 
over de volgende mogelijkheden: 

- Letterafstand 10, 12,15 en proportioneel 

- Regelafstand 1, VA en 2 

- Automatisch vetdrukken en onderlijnen 

- instelbare tabulator en decimale taDulator 

- Automatische correctie 

- centreren van tekst 

De CE6IIXL beschikt over een Centronics parallel 
of (als optie) een RS232C interface voor koppeling 
met uw computersysteem, waarbij gebruik wordt 
gemaakt van standaard aansluitingen. 

Als printer werkt de CE61KL met standaard diablo 
printercodes zodat de koppeling met uw computer 
en tekstverwerker moeiteloos kan geschieden. 

uiteraard werkt de CE6IXL ook bidirectioneel en 
logic seeking, en is de printsnelheid Beduidend 
hoger in vergelijking tot de vorige serie printer/ 
schrijfmachines 

ook deze printer/schrijfmachine wordt weer onder 
de bekende MICRO PLUS condities geleverd. 


^/scfirij^ iaC,lineS 


enerat ,e 


microplus 


MICRO PLUS BV TELEFOON 
ZOMERDIJK 31 (075) ■ 35131 V 
1505 HWZAANDAM (075)-351857 





Utility-Modules zijn er vele en de ontwikkeling ervan gaat vaak sneller, dan wij bij 
kunnen houden. De makers ervan zijn zeer actief en proberen elkaar steeds te 
overtroeven. Er zijn de laatste tijd twee opvallende cartridge’s voor de Commodore-64 
op de markt gekomen, de Final Cartridge van H.&P. en de Power Cartridge van K.C.S. 
De mogelijkheden van deze uitbreidingsmodules zijn aanzienlijk groter dan die van de 
vorige generatie. Het nadeel is, dat ook de prijs van de nieuwe spel- en programmeer- 
hulpen daardoor wat hoger is geworden. Al met al reden genoeg voor ons om de twee 
nieuwelingen eens op de testbank te leggen. 

De moduleslag 

Cartridge versus cartridge 



Final versus Power!! 


E en cartridge, tenminste de dingen 
waar we het hier over hebben, is 
een ROM op een printplaatje. Het 
bevat een stukje software waar¬ 
mee de computer waarop het 
ding wordt aangesloten meer mogelijk¬ 
heden krijgt. De meeste van deze print- 
plaatjes zijn ingebouwd in een mooi 
plastic doosje, die passen in de connec- 
tor. De Commodore-64 bezit aan de 
achterkant namelijk een zogeheten car- 
tridgepoort. 

Die is vanaf de achterzijde gezien de 
meest linkse connector, waar de verschil¬ 
lende cartridges in kunnen worden gesto¬ 
ken. Daarna doet de computer zelf de rest. 
Bij het aansluiten en verwijderen van de 
cartridge of module is het beslist noodza¬ 
kelijk dat de computer uit staat. Is dit niet 
het geval, dan bestaat er zo’n 50 procent 
kans dat de computer het overleeft. De 
situatie kan dan voorkomen, dat er op 
verkeerde polen van de poort of de module 
een stroomstoot wordt gegeven, waar¬ 
door één of meerdere chips in onze digita¬ 
le vriend het kunnen begeven. Zo’n 'slor¬ 
digheidje’ kan heel wat geld gaan kosten. 

Voordelen 

Een cartridge heeft het grote voordeel dat 
de software die erin zit binnen enkele 
micro-seconden in het computergeheu¬ 
gen kan worden ingelezen. Bij gebruik van 
een diskette of cassette neemt het inlezen 
van een programma vele malen meertijd in 
beslag. Maar waar het uiteindelijk óók bij 
een cartridge om gaat, is de software. Er 
kan van alles op staan, van spelletjes tot 
zakelijke software. In dit artikel willen we 
het echter hebben over de modules die de 


elementaire mogelijkheden van uw com¬ 
puter uitbreidt. Regelmatig blijkt dat de 
standaard set met (Basic)opdrachten die 
in de C-64 zitten ingebouwd, niet voldoen¬ 
de zijn om de programmeur te bevredigen. 
Denk daarbij ook aan de moeilijk te ont¬ 
houden en in te toetsen commando’s om 
een bestand van disk of tape te lezen of het 
simpele feit, dat de disk-directory op de 
plaats van het zojuist geschreven pro¬ 
gramma in het geheugen wordt gezet. 
Daarnaast kent de Commodore-64 bij¬ 
voorbeeld geen RENUMBER funktie, en 
geen FIND en ga zo maar door. En met 
name deze 'onvolkomenheden’ van het 
originele ontwerp kunnen heel goed wor¬ 
den opgelost door een stuk software die 
de nodige tools of gereedschappen aan 
de standaardset van de C-64 kan toe¬ 
voegen. 

Er zijn in de loop van de home-computer 
geschiedenis al door heel wat softwarehui¬ 
zen van deze handige programmaatjes 
ontwikkeld en op de markt gebracht. De 
bekendste is wel Simon’s Basic die zowel 
op tape, disk als in cartridgevorm te krijgen 
was. Daarna kwamen de ’Turbo-tools’ 
’diskkits’ en ’tapehulpen’. Maar deze pro¬ 
grammatuur is inmiddels al weer ouder¬ 
wets. We zitten op het ogenblik al midden 
in de derde generatie van deze toolkits, en 
de praktijk heeft geleerd, dat het alleen 
maar rendabel is om deze software op 
cartridge te verspreiden. Enerzijds geeft 
dit de gebruiker een grote tijdwinst en 
meer vrijheid in het werken met allerlei 
andere (machinetaal)hulpmiddelen, aan de 
andere kant blijkt het een beetje moeilijker 
om de beveiligde modules te kraken en er 
piratenkopiëen van te gaan verspreiden. 


Een nieuwe generatie 

Recentelijk zijn er een tweetal cartridges 
uitgebracht die revolutionair (kunnen) wor¬ 
den genoemd. Dit zijn de Final Cartridge 
en de Power Cartridge. Nam een uitbrei- 
dingsmodule geen (Basic)geheugen in be¬ 
slag, dan toch nog wel een stuk machine¬ 
taal RAM. Het ging hierbij dan vaak om de 
adressen $C000 (49152) en hoger en dat 
stukje geheugen wordt door heel wat ap- 
plicatieprogramma’s nogal druk bezocht. 
Het resultaat was dat heel wat software 
regelmatig met de programmatuur van het 
printplaatje in conflict kwam en de boel 
uiteindelijk vastliep. Het was dan ook heel 
plezierig dat er op bijna al deze cartridges 
een resetknop zat. De revolutionaire ver¬ 
betering die men nu heeft aangebracht, 
bestaat voornamelijk uit het feit dat de 
software van de module niet meer in con¬ 
flict komt met andere programma’s. 

De microprocessor leest uw toetsenbord 
enige tientallen keren per seconde uit, 
houdt het geheugen bij en scant ook het 
operatingsysteem (besturingsysteem). Bij 
de 'Final cartridge’ wordt het probleem 
opgelost door een nieuw operatingsys¬ 
teem over het oude heen te leggen. Bij de 
KCS 'Power Cartridge’ gaat het anders. 
Hier wordt nadat de computer in het ope¬ 
ratingsysteem heeft gekeken ook nog in 
de cartridge ROM gekeken. Het voordeel 
bij de beide modules is dus dat praktisch 
alle software zonder problemen en met 
behulp van de cartridge kan worden gela¬ 
den. Daar deze cartridges zowel een disk- 
als een tape-snellader hebben is dat terde¬ 
ge van belang. Naast enige overeen¬ 
komsten zijn er ook belangrijke verschillen 
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tussen de 'Final cartridge’ en de 'Power 
cartridge’. Vandaar dat we hun mogelijk- 
en onmogelijkheden afzonderlijk zullen be¬ 
kijken. 

De Final Cartridge 

De 'Final Cartridge’ is ontwikkeld door 
H&P Computers uit Rotterdam. De cartrid¬ 
ge paste tot onze verrassing met geen 
mogelijkheid in de SX-64, dat is een porta¬ 
ble Commodore-64. Het doosje om de 
cartridge was hiervoor iets te dik. De mo¬ 
dule bezit, in tegenstelling tot de 'Power 
cartridge’, een aan/uit schakelaar en een 
'echte' resetknop. Deze resetknop zelf is 
helaas nogal van slechte kwaliteit. U kunt 
hiermee een aantal verschillende resets 
uitvoeren. Dat komt omdat de knop in 
samenwerking met een aantal toetsen kan 
worden gebruikt en al naar gelang de 
gekozen toets een funktie uitvoert. 


Final Cartridge 
mogelijkheden: 



Monitor Commando's 



Auto 

Go run 

Delete 


Load 

Old 

Memory display 

Find 


Save 

Help 

Basic return 

Append 

Assembleren 

Catalog 

Disassembleren 

Dappend 

Fillmemory 

Disk 

Hunt memory 

Dload 

Transfer memory 

Dsave 

Bankswitching 

Dverify 

Compare 

List 

Monitor 

Off 

CTRL-Del 

CTRL-Home 


Het gaat te ver om al deze commando’s uit 
te leggen. Echter een aantal specifieke com¬ 
mando’s zijn zeker de moeite van bespreken 
waard. 

Catalog: ook wel bekend als het DIRcom- 
mando. Dit geeft de inhoud van de directory 
op het scherm weer, zonder het programma 
dat in het geheugen staat te verwijderen. 
List: geeft een list van Basicprogramma’s, 
waarbij eventuele listprotecties worden ver¬ 
wijderd. 

CTRL-home: verplaatst de cursor naar links 
onderaan in het beeldscherm, CTRL-Del: 
laat alles wat achter de cursor op dezelfde 
regel staat verdwijnen. 

Al deze commando's kunt u afkorten. Dit 
gaat net zoals het afkorten van de basic- 
commando’s. Mocht u regelmatig hi-resolu- 
tion of low- resolution plaatjes op uw printer 
willen afdrukken, dan treft u hiervoor op 
deze cartridge een aantal grootse mogelijk¬ 
heden aan. 


Conclusie: 

Het door ons ontvangen exemplaar was 
niet al te netjes in elkaar gezet. Een gesta¬ 
peld IC met weerstanden en diodes erom¬ 
heen blijft nu eenmaal minder fraai. De 
handleiding in de vorm van een stencil kan 
ook veel beter. 

Al met al een nieuw speeltje, waarin diver¬ 
se tot nog toe niet ontdekte mogelijkheden 
zijn verwerkt, maar in z’n totaliteit niet 
optimaal te noemen. Desondanks kunt u 
aan deze cartridge heel wat plezier be¬ 
leven. 

De 'Power cartridge’ 

Het Dordrechtse bedrijf KCS brengt dit 
werkelijk schitterende printplaatje op de 
markt. Ook deze module bezit een toolkit, 
een machinetaalmonitor en een groot aan¬ 
tal mogelijkheden voor het afdrukken van 
zowel Hi- als Lowresolution plaatjes op de 
printer. 

Wat deze module echter uniek maakt is 
een heel andere funktie, namelijk de Total 
Backup funktie. Met deze funktie is het 
mogelijk om een programma, ongeacht 
hoe zwaar beveiligd, naar disk of tape te 
SAVEn. De cartridge bezit maar één dege¬ 
lijk uitgevoerde drukschakelaar. Als u hier¬ 
op drukt dan wordt een speciaal menu 
geactiveerd, ongeacht welk programma er 
op dat moment in de computer runt. 

Vanuit dit menu kunt u vervolgens in de 
machinetaal monitor komen, of een afdruk 
van het scherm op uw printer laten printen. 
Ook kunt u dus een kopie, van het in het 
geheugen aanwezige programma maken. 
Mocht u bijvoorbeeld bezig zijn met een 
schaakprogramma, dat niet de mogelijk¬ 
heid heeft om de positie van de stukken te 
saven, en u krijgt onverwacht visite... Een 
druk op de knop, even saven en gewoon 
de volgende avond verder spelen. Hoewel 
een aantal softwarehuizen hier niet blij 
mee zal zijn, kunnen de gebruikers er hun 
voordeel mee doen. 

Heeft u bijvoorbeeld een programma dat 
op cassette een kwartier laadtijd nodig 
heeft, dan kunt u dat met deze cartridge 
aanzienlijk bekorten. U maakt namelijk ge¬ 
woon even een ’Total backup’ (in turbo) 
naar tape of eventueel naar disk. 


C-16 cassette 

Onze lezersservice Infolist heeft een 
speciale cassette samengesteld waar¬ 
op uitsluitend C-16 programma’s zijn te 
vinden. 

Alereerst natuurlijk de nieuwe Check- 
sum.C-16en Visi.C-16, maar daarnaast 
ook een aantal listings, die in de voor¬ 
gaande nummers zijn verschenen, lis- 
ting uit dit nummer en ook nog een 


Power Cartridge 
mogelij kheden 
Commando’s 

Monitor commando’s 


Auto 

Safe 


Color 

Unnew 

(P)rinten 

Deek 

S 

(R)egisters 

Delete 

Dsave 

(S)ave 

Doke 

Dir 

(T)ransfer 

Dump 

Device 

(Vjerify 

Find 

lload 

(W)alk 

Hardcat 

Backup 

e(X)it 

Hex$ 

Merge 


lf then (M)emory 

(Ajssemble 


Info 

(C)ompare 

Tracé 

Key 

(D)isassemble Quit 

List 

(F)ili 

Dload 

Merge 

(G)o 

Dverify 

Monitor 

(H)unt 

Disk 

Pause 

(l)nterprei 

Merge 

Plist 

(J)ump 

Bload 

Renum ($)directory 

(L)oad 

Hardcopy 

Repeat verkorte DOS 

Audio 


Ook hier willen we een paar opvallende 
commando’s van een korte toelichting voor¬ 
zien. 

Hardcat: dit geeft een uitdraai van de direc¬ 
tory op de printer. 

Pause: dit kunt u in uw basicprogramma 
inbouwen. D.m.v. de opdracht Pause3 
wordt er dan een pauze van drie seconden 
gemaakt. 

Plist: geeft een listing op de printer weer. 
Audio: maakt het mogelijk om het cassette- 
recordersignaal, middels streepjes in het 
beeldscherm zichtbaarte maken. Het geluid 
wordt dan bovendien via de speaker weer¬ 
gegeven. 

Ook hier kunt u alle commando’s op de 
tweede of derde letter afkorten. Ondanks de 
goede gebruiksaanwijzing hadden we toch 
enige moeite voordat we een hires-plaatje 
op onze printer konden afdrukken. Verder 
kun je geen echte reset geven. Als je dus 
vastloopt met een programma en niet in het 
speciale menu komt, dan rest alleen nog het 
uit en aanzetten van de computer. Verder is 
de 'Power cartridge’ print fraai ontworpen 
en voorzien van een masker. Hierdoor ko¬ 
men de printbanen onder een geisoleerde 
laklaag te liggen, wat de levensduur van de 
module ten .goede komt. Voor het extern 
geheugen maakt men gebruik van het 6116 
IC, deze komen we tegenwoordig wel vaker 
tegen. Deze cartridge kunnen we zonder¬ 
meer aan iedere C-64 gebruiker aanbevelen. 


aantal niet eerder gepubliceerde lis¬ 
tings. Kortom, een waardevolle tape 
voor beginners én gevorderde C-16 
computeraars. Daarnaast zijn de pro¬ 
gramma’s natuurlijk ook allemaal ge¬ 
schikt voor de Plus/4. 

De tape is - net als alle andere Infolist 
produkten - te bestellen door ƒ24,50 
(voor de diskette ƒ 29,50) over te ma¬ 
ken naar giro 3157656 t.n.v. Infolist, 
Huizen. 


78 



Conclusie 

Beide door ons bekeken modules kunnen 
de toets van de kritiek probleemloos door¬ 
staan. Er is dan ook geen reden om de ene 
cartridge ver boven de andere te laten 
uitsteken. Op de ’Final Cartridge’ zitten 
een paar opties, die niet voorkomen op de 
'Power cartridge’, maar dat is omgekeerd 
ook het geval. Een nadeel bij de ’Final 
Cartridge’ is het feit, dat er twee uitvoerin¬ 
gen van bestaan. Één voorseriele printers 
en één voor de parallel-gestuurde regel¬ 
drukkers. Zeer onhandig, als je over beide 
soorten printers beschikt, of nog niet weet 
welk type je gaat kopen. KCS’ Power 
Cartridge beschikt in één versie over alle 
mogelijkheden om de meest denkbare 
printers, óók in Hi-res, te kunnen aan¬ 
sturen. 

De werking van beide apparaten verloopt 
zoals er verwacht mag worden, al kunnen 
wij ons ook daar niet aan de indruk onttrek¬ 
ken dat de Power Cartridge alles iets snel¬ 
ler kan verwerken. Jammer is het dat geen 
van beide modules kans ziet om de op het 
scherm aanwezige sprites op de printer te 
kunnen afdrukken, terwijl die doorgaans 
een belangrijk deel van een hires-plaatje 
uitmaken. Bij een printkopie blijven we 
meestal zitten met alleen de niet zo inte¬ 
ressante achtergrond. 

De gebruikers die inmiddels in het bezit 
zijn van een oudere module met min of 
meer dezelfde functies zal terdege moeten 


wikken en wegen of er wel zoveel veran¬ 
derd is in de nieuwe generatie tool-ridges, 
zodat hij er eigenlijk niet meer zonder kan. 
Nieuwelingen moeten echter niet aarzelen 
één van deze opzienbarende modules aan 
te schaffen, hoewel ze vrij prijzig zijn. De 
'Power Cartridge’ kost ƒ139.- terwijl voor 
de ’Final Cartridge’ ook een prijs van 
ƒ139.- op de tafel moet worden gelegd. 
Echt duidelijke verschillen hebben we niet 
kunnen ontdekken, maar in ons geval ko¬ 
zen we na een tijdje werken met beide 
modules voor rood) de 'Power Cartridge’, 
temeer omdat we zelf nogal veel werken 
met de SX-64. 

Willen we ons tenslotte tot een (voorzichti¬ 
ge) conclusie dwingen, dan kunnen we 
zeggen dat we de 'Final Cartridge’ eerder 
een 'power cartridge’ vinden en de 'Power 
Cartridge’ inderdaad, meer als de ’final 
cartridge’ zien. Welke van de twee u zich 
ook mocht aanschaffen, we zijn er bijna 
zeker van dat u deze aankoop niet zult 
betreuren. j B 


MI5SERS 

Ook deze keer weer wat aanvullingen 
en verbeteringen op programma’s uit 
eerdere bladen. 

In nummer 8 van 1985 stond het program¬ 
ma Sjoelen. Dat draaide prima, maar om 
ook na het eerste spel een correcte pun¬ 


tentelling te krijgen dient u de variabelen 
op nul te zetten. Dus regel 20 moet dan als 
volgt worden: 

20 S=0:FOR A =1 TO 7:P(A)=0: 
Q(A)=0:R(A)=0:S(A)=0:NEXT A. 

Hierbij ook nog drie missers uit nummer 9 
van 1985. In het programma Lottoprogno- 
se is er iets misgegaan met de variabele K. 
K=0 in regel 980 moet K=1 zijn. In regel 
3580 moet u na P=1 het volgende intik¬ 
ken: :K=1 

In regel 1160 van het programma Spelre- 
cord is een stukje weggevallen. Deze regel 
eindigt met: (BL$,10 

U moet dit verder aanvullen met: ):^EXT P 
Het programma Woestijnrace blijft kenne¬ 
lijk problemen geven. Voor alle duidelijk¬ 
heid nog een keer: in regel 370 staan twee 
verschillende soorten streepjes. De eerste 
twee krijgt u door de Shifttoets in combina¬ 
tie met het sterretje in te tikken. Het derde 
en laatste streepje is het minteken. 

In het adresbestand programma uit num¬ 
mer 10 moet u in regel 130 achter elke 
variabele (X) zetten. Dus B$ wordt B$(x) A$ 
wordt A$(x) etc. 

In de Miniatuurtjes van nr. 10 stond er een 
X ipv een T in regel 20 van Handig. 

In de serie MachinetaalC-16 in de nummers 
8 en 9 is er een printerprobleem opgetre¬ 
den, daar waar een pondteken stond, moet 
een hekje staan, een hexadecimale teken¬ 
verwarring. 


i ° IEDERE COMPUTER 
1: VERDIENT ’N : 

: PROJECTA-TAFEL: 

Wij geven u graag alle informatie. 



PROJECTA 

Postbus 191,6000 AD WEERT, Tel. 04950-35118 


Chalk BoardPowerPad 


De PowerPad is hel revolu¬ 
tionaire, nieuwe 30x30 cm 
aanrakingsgevoelige bord, 
dat u in staat stelt het toet¬ 
senbord van uw computer 
te ’bmzeilen”. U hoeft het 
bord maar aan te raken en u 
ziet de resultaten daarvan in 
levendige kleuren op uw 
scherm verdwijnen. De 
PowerPad voegt een geheel 
nieuwe dimensie aan uw 
computer toe. 

Leverbaar voor Commodo¬ 
re®, Apple® en Atari® com¬ 
puters. 

PowerPad ƒ249,-* 
Software vanaf ƒ 49,-* 

Voor de PowerPad kunt u 
kiezen uit de software col¬ 
lectie in Leonardo's Library. 
Afhankelijk van uw keuze 
wordt uw PowerPad omge¬ 
toverd tot tekenblok, schil- 
dersdoek, pianotoetsen- 
bord, legpuzzel, spellen- 
bord, enz. enz. 

Importeur: 


Saentdb.v. 

Speldenmakerstraat 10c 
5232 BG ’s-Hertogenbosch 
Telefoon 073-424055 
Amerikalei 220, bus 8 
2000 Antwerpen 
Telefoon 03-2379365 



MicroMaestro (zie afbeelding) 

Uw PowerPad als piano. Druk de toetsen in en u hoort en ziet 
wat u speelt. Zo wordt muziekles pas echt leuk. 


* Prijzen incl. B.T.W. 







Gebruikersgroepen 


De VCGN (070-971851) is de 
oudste Commodore 
gebruikersvereninging en 
heeft iedere laatste zaterdag 
van de maand in het 
Lodewijk Makeblijde lyceum 
in Rijswijk haar grote 
bijeenkomst. 

Inlichtingen over de vele 
afdelingen kunt u krijgen via: 
Zeeland 01180-25746 West- 
Brabant 01640-51639 
Midden-Brabant 01620-55634 
Oost-Brabant 04120-42054 
Zuid-Limburg 043-476935 
Zuid-Holland 010-501023 

PET Benelux heeft 
bijeenkomsten in Zeist (Ie 
zaterdag), Nijmegen (2e 
zaterdag) en Haaksbergen 
(3e zaterdag). (Inl.05759- 
2211 ). 

De HCC Commodore 
gebruikersgroep heet 
Compet, 03404-59599. 

HOT NEWS van SCN uit 
Amsterdam is langzamerhand 
de grootste vereniging van 
ons land (03450-16051) heeft 
haar maandelijkse 
bijeenkomst in de Meervaart 


op de 2e zaterdag van de 
maand en ook activiteiten in 
Zwolle (038-548459), Midden 
Nederland (03453-1375) en 
Deventer (05700-50758). 

CCCB is een van de clubs uit 
Belgie, met afdelingen in 
Antwerpen, Limburg, West- 
Vlaanderen inl. Bindstr. 19, te 
2600 Berchem Antwerpen. 

Lid worden door storting 500 
fr op 405-5092171-90 tnv. 
CCCBA. 

Ook HCC België blijft actief, 
met bijeenkomsten iedere 2e 
en 4e maandag op de 
Ottergemsestwg-Zuid 705 te 
Gent (03-6468961). 

In Arnhem zit een 
Commodore-club, waar men 
clubavonden op dinsdag 
iedere twee weken 
organiseert en ook cursussen 
geeft. Inl. Hofsingel 259 te 
6834 GH Velp, tel. 085- 
647782. 

In Noordwijk zit een C-64/ 
128 gebruikersgroep, die 
iedere 1 e donderdag een 
bijeenkomst heeft. 

Inlichtingen A. vd Klaauw @ 
01719-16720. 


De 

kapriolen 



Het eerste computer geassisteerde 
computerspel, De Kapriolen wordt 
meteen heuse Probot 
(PROgrammeerbareroBOT) 
gespeeld, De probot (FL0YD) is 
vooraf geprogrammeerd om vuil op te 
ruimen en barsten te repareren van 
het riolenstelsel van 6 wereldsteden. 
Verschillend camerahoeken voor 
een duidelijkaktieoverzicht, De 
Kapriolen wordt geleverd met een 
handleiding,waarinde vele 
mogelijkheden staan weergegeven 
om F LOYD te prog rammeren. 
Verkrijgbaar op cassette of diskette 
voor Commodore 64. 


Door Edwin Neuteboom, 



Verkrijgbaar bij de oll RadarSolt dealers o.a Vroom & Dreesman. Dixons. 
Fotoquelle eva. 


Andere kwaliteitsprogramma's van 
RadarSoft voor uw CBM64 zijn 

- De grotten van Oberon - Eindeloos 

• Topogratie Europa/Wereld/div landen 

- Tempo typen • Rekenwonder 

- Letterstress • Radarbasic 50K 

- Databasic - Steen der Wijzen 

- Tijdreiziger Anonimus - Horror Hotel 
Nautilus - Zone 7 



GELUIDDEMPENDE 


De geluidsoverlast van de huidige PC-printers kan nogal 
vervelende hoogten bereiken. Daarom levert ALDIA nu de 
GENEAL PC-kap. Deze kap-uitgevoerd in plaatmateriaal 
(45x37x15,5 cm)-heeft onderin een opslag voor papier. Achter¬ 
in de kap bevinden zich doorvoergleuven voor het papier, die 
tevens als ventilatiegleuven voor de printer dienen. Wilt u meer 
informatie, stuur 


dan nevenstaan¬ 
de bon in gesloten 
envelop naar 
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Naam 


Adres 


Plaats/Postkode 


Postbus 66, 

1670 AB Medemblik, 
Tel. 02274-3210/4787. 


| Telefoon 
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Waarom ƒ1400,- 
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betalen, als je 
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je monitor-probleem 
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voor slechts ƒ 79,- 
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kunt oplossen?? 
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In de 128 mode is een 80 koloms 


E— 

monitor nodig, maar wat doe je dan 



met je bestaande RGB monitor, die 
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er maar 40 aankan? 
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Een nieuwe monitor kost handenvol 



geld, terwijl je met de ROBTEKS 



MAGICMONITOR INTERFACE wel80 
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kolommen op de bestaande monitor 



krijgt en dat voor slechts ƒ 7.9, -. Om- 



schakelen tussen 40 en 80 kolom- 

o 
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men blijft mogelijk. 
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Voor informatie : 
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MICRO-CITY 


CJ 

Distribution B.V. 



Albertdonk 14, Roosendaal 


o 

S 01650-58888 



SCIENTEX pvba 



W.Ogierplein 2, 2000 Antwerpen 
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